питає ім'я НД, у який варто скопіювати поточний. Це зображено на малюнку 17
В
Рисунок 17 - Запит на ім'я нового файлу
На малюнках 18 і 19 зображені два вихідних файл, а на малюнку 20 ми можемо бачити файл після копіювання в нього іншого.
В
Малюнок 18 - Перший набір даних
В
Малюнок 19 - Другий набір даних
В
Рисунок 20 - Результат виконання запиту В«Збереження всіх елементів в іншому НДВ»
Висновок
програма дане безліч
В результаті розробки курсової роботи, була створена програма для роботи з набором даних. Ця програма може створити НД у вигляді записів і безпосередньо записати їх у файл. Також за допомогою програми можна переглядати вже створені набори даних. Реалізовано пошук елемента у файлі за його номером та додавання елементів в кінець вже створеного НД. Можливий перехід від роботи з одним НД до іншого і копіювання вмісту одного файлу в іншій. Також, відповідно з індивідуальним завданням, можливе створення нового НД з усіх елементів із заданим значенням ключового поля. p align="justify"> Всі умови і обмеження, описані в задачах і цілях даної курсової роботи, були дотримані. Як було встановлено у другому розділі, вся робота з НД виконується коректно. p align="justify"> Список використаних джерел
1.Зуев Е.А. Програмування на мові Turbo Pascal 6.0,7.0,/Є.А. Зуєв// М.: Веста, Радіо і зв'язок, 1993. - 376с. p align="justify">. Введення в програмування [Текст]: навч. посібник для вузів за напрямом і спеціальністю АСОІ [Текст]/Л.В. Шапорев [та ін]; під ред. І.В. Фленов. - М.: Вища школа, 2005. - 601 с.
. Вільна енциклопедія Вікіпедія [Електронний ресурс]. - 2011. - Режим доступу: # "justify"> Додаток А
ПОВНИЙ КОД ПРОГРАМНОГО КОМПЛЕКСУ
Лістинг основної програми:
Uses Crt, MenuMod, RabotaND, RabotaDR;
;
{Введення імені файлу} ('Введіть шлях до файлу:'); (Filename);
{Ініціалізація змінної для позначення поточного елемента}: = 2;
{Заповнення масиву пунктів меню значеннями} [1]: = '1: Створити новий НД '; [2]: = '2: Додати нові елементи в кінець НД'; [3]: = ' 3: Переглянути всі елементи НД '; [4]: ​​= '4: Пошук елемента за номером'; [5]: = '5: Перейти до роботи з іншим НД '; [6]: = '6: Створення нового НД з всіх елементів із заданим значенням ключі-вого поля. '; [7]: = '7: Збереження всіх елементів в іншому НД';;
{Виведення на екран поточних НД і елемента} (14); (1, 9); ('Поточний НД -', Filename); (1,12); (...