p align="justify"> У програмі використовуються 2 власних процедури:
1. CreatePriborFile - створює типізований файл власного типу pribor і записує в нього дані, введені користувачем з клавіатури.
Вхідні параметри: FilePath типу string - шлях до файлу.
2. ReadPriborFile - записує в масив власного типу pribor, дані з файлу за адресою FilePath.
Вхідні параметри: FilePath типу string - шлях до файлу, pribors тип array of pribor - масив для запису даних, length типу integer - довжина отриманого масиву даних.
спадний програмування модуль інтерфейс
1.4 Блок-схеми програми і власних процедур
1.5 Лістинг програми
program kyrsach; CRT;= С: my.dat raquo ;;=record: string [25] ;: string [25] ;: string [4] ;: string [50];:string [25] ;: integer [5] ;;: char ;: array [0..50] of pribor ;, i, j, godvupyska, stoimost: integer; CreatePriborFile (FilePath: string) ;: file of pribor;
1.6 Тестування
Рис. 1. Основне меню програми.
Рис. 2. Пункт Про програму
Рис. 3. Додаткове меню
Рис. 4. Введення даних контрольного прикладу
Рис. 5. Дані контрольного прикладу з файлу
Рис. 6. Відомості про приладах, що мають найбільшу вартість ремонту
Рис. 7 Інформація про кількість приладів одного типу, що вимагають однакової деталі для ремонту.
2. Завдання №2
. 1 Формулювання завдання
Дан масив 9 х 8. Додати до масиву перший рядок, в яку записати максимальні елементи кожного стовпця.
. 2 Опис змінних
- столбец- рядок
i - ціле число, що використовується в циклі розрахунку результатів. Змінної присвоюються значення від 1 до m, тобто значення номерів елементів массіва.- ціле число, що використовується в циклі розрахунку результатів. Змінної присвоюються значення від 1 до n, тобто значення номерів елементів массіва.- ціле число, яке виходить в результаті дій складеної програми.
а - ціле число, що використовується в циклі розрахунків.
2.3 Блок-схема задачі
2.4 Лістинг програми
massivi; crt; m=9; n=8; a: array [1..m, 1..n] of integer;, j, max, a, m, n: integer;
2.5 Тестування
Малюнок 8. Контрольний приклад 2 завдання
Висновок
У курсовій роботі для вирішення завдань були складені 2 програми.
Перша програма створює базу даних приладів і має функції вибірки даних про прилади має найбільшу вартість ремонту і підраховує кількість приладів одного типу, що вимагають однакових деталей для ремонту.
Друга програма додає першу сходинку, в яку заносить максимальний елемент кожного стовпця.
Список літератури
1. Абрамов В.Г., Трифонов Н.П. Введення в мову Паскаль.- М.: Наука, 2008. - 320 с.
2. Абрамов С.А., Зима Е.В. Почала програмування мовою Паскаль.- М .: Наука, 2007. - 112 с.
. Бутоми І.Д., Самочадін А.В., Усанова Д.В. Програмування на алгоритмічній мові Паскаль.- Л .: Видавництво Ленінградського університету, 2012. - 216 с.
. Грехем Р. Практичний курс мови Паскаль.- М .: Радіо і зв'язок. 1986 - 200 с.
. Йенсен К., Вірт Н. Керівництво для користувача і опис мови.- М., 2007. 151 с.
. Пильщиків В.Н. Збірник вправ з мови Паскаль.- М .: Наука, 2009. - 160 с.