- •Міністерство освіти і науки, молоді та спорту України
- •1. Щоденник проходження практики
- •2. Аналіз завдання та початкових умов
- •2.1. Постановка задачі
- •2.2. Призначення програми
- •2.3. Вимоги до програми
- •Математична модель рішення задачі
- •Модульна структура програми
- •Специфікація програми
- •Структура інтерфейсу користувача
- •Інструкція користувача
- •Контрольні приклади
- •Код програмних модулів
- •Список літератури
Модульна структура програми
Модульна структура програми наведена на мал. 2
Мал.2
Специфікація програми
Специфікація програми наведена у таблиці 1.
Таблиця 1
Позначення |
Призначення |
const N=15; |
Розмірність масиву |
Form1: TForm1; |
Головна форма програми |
i,j:Integer; |
Змінні, необхідні для переміщення по масиву |
procedure Form1.PoiskClick, procedure TForm1.N2Click |
Головна процедура програми, обчислює шлях і виводить його |
map: array [1..N, 1..N] of Integer; |
Масив, який визначає карту доріг |
road: array[1..N] of Integer; |
Дороги |
incl:array[1..N] of Boolean; |
Елемент масиву дорівнює true, якщо точка включена в маршрут |
start, finish:Integer; |
Початкова і кінцева точки шляху |
found:Boolean; |
Якщо маршрут не знайдено, виводиться відповідне повідомлення |
len:Integer; |
Довжина знайденого мінімального маршруту |
C_len:Integer; |
Довжина поточного маршруту |
procedure step(s,f,p:Integer); |
Процедура вибору наступної точки маршруту |
c:Integer; |
Номер точки, в яку робиться наступний крок |
i:Integer; |
Допоміжна змінна |
procedure TForm1.FormActivate |
Процедура, яка в процесі завантаження програми автоматично заповнює масив певними фіксованими даними |
procedure TForm1.ClearClick, procedure TForm1.N4Click |
Процедура очистки масиву |
Procedure TForm1.MaskEdit1KeyPress, procedure TForm1.MaskEdit2KeyPress, procedure TForm1.StringGrid1KeyPress |
Процедури захисту полів вводу та масиву від введення даних відмінних від числових значень |
Procedure TForm1.FormCloseQuery |
Процедура підтвердження на вихід з програми |
procedure TForm1.N8Click |
Процедура виводу довідки про програму на екран |
procedure TForm1.N9Click |
Процедура виводу відомостей про програму |
Form2: TForm2; |
Форма, на якій виводиться довідкова інформація |
procedure TForm2.BitBtn1Click |
Процедура, яка закриває форму |
AboutBox: TAboutBox; |
Форма, яка містить відомості про назву форми, автора та версію програми |
Procedure TAboutBox.OKButtonClick |
Процедура, яка закриває форму |
Структура головного меню програми
“Пошук найкоротшого шляху”
Введення початкової точки
Введення кінцевої точки
Виведення шляху
Карта
Кнопка “Пошук”
Кнопка “Очистка”
Кнопка “Вихід”
Меню “Файл”
Пошук
Очистка
Вихід
Меню “Довідка”
Виклик довідки
Про програму
“Довідка”
Виведення довідки
Вихід
“Про програму”
Вихід