ми з реалізацією найпростішого меню слід визначити в окремому модулі.
Процедури, що реалізують запити, повинні бути розміщені в одному або більше модулях.
Глобальні дані: Специфікація файлу. Ніяких інших глобальних змінних використовувати не можна.
Разом з меню на екрані має бути відображено:
номер поточного елемента;
вміст поточного елемента.
На екран виводити елементи у вигляді таблиці (один елемент - один рядок таблиці).
Якщо після виконання запиту змінюється хоча б один елемент, то закінчувати запит висновком всього безлічі елементів.
Тестами до завдань служать 2 НД з правдоподібною інформацією.
Опис програми
1.1 Опис головної програми та перелік модулів
Програма складається з трьох модулів і головної програми. Всі підпрограми, які виконують необхідні запити по роботі з НД, знаходяться в трьох модулях (MenuMod, RabotaND, RabotaDR). p align="justify"> На початку роботи програми ми вказуємо набір даних, з яким будемо працювати. Потім на екрані відображається вертикальне меню. У цьому меню будуть вказані всі запити, які користувач може виконати з набором даних. При виборі пункту меню В«ВихідВ» робота програми буде закінчена. Разом з меню на екрані відображається номер поточного елемента і його вміст. p align="justify"> У головній програмі також відбувається заповнення масиву пунктів меню значеннями. p align="justify"> Код головної програми:
Uses Crt, MenuMod, RabotaND, RabotaDR;
;
{Введення імені файлу}
{Ініціалізація змінної для позначення поточного елемента}
{Заповнення масиву пунктів меню значеннями}
{Виведення на екран поточних НД і елемента} _Tek (FileName, tek);
{Висновок меню} _Meny (mas, 2,2, punkt);
{Виконання процедур залежно від обраного пункту} punkt of
: {Створення нового НД та його перегляд}
2: {Додавання нових елементів в кінець НД та його перегляд}
3: {Перегляд всіх елементів НД}
4: {Пошук елемента}
5: {Перехід до роботи з іншим НД та перегляд його вмісту}
: {Створення нового НД з усіх елементів із заданим значенням ключі-вого поля.}
7: {Збереження всіх елементів в іншому НД}
Sohr_v_nov (FileName);;
{Цикл виконується до того, як буде натиснут...