Підпрограма procedure TForm1.Button6Click (Sender: TObject)
Вхідні дані: запис ver;
Вихідних даних: запис ver;
Процес обробки: через цикл, кожній вершині присвоюється значенні 0 і викликається підпрограма Button9.Click, яка задає нові координати x і y кожній вершині через цикл.
Використовувані зовнішні змінні: i-лічильник, ver [i]. x і ver [i]. y - координати вершин.
Підпрограма procedure TForm1.Button7Click (Sender: TObject)
Вхідні дані: файл з розширенням *. gph;
Вихідні дані: дані матриці суміжності;
Процес обробки: з файлу з розширенням *. ghp зчитуються дані для зображення на компоненті Image1 системи доріг і міст.
Використовувані зовнішні змінні: i, j, k-лічильники, f - ім'я файлу.
Підпрограма procedure TForm1.Button8Click (Sender: TObject)
Вхідні дані: дані матриця суміжності;
Вихідні дані: файл з розширенням *. gph і ім'ям f;
Процес обробки: на диску створюється файл з розширенням *. gph, в який через цикл записується зміст матриці суміжності.
Використовувані зовнішні змінні: i, j, k - лічильники, f - ім'я файлу.
Підпрограма procedure TForm1.Button9Click (Sender: TObject)
Вхідні дані: запис ver;
Вихідні дані: зображення на Image1;
Процес обробки: встановлюється step, присвоюється змінної ns кількість міст, якщо є міста, у яких координати рівні 0 вони змінюються на інші, не нульові, і викликається підпрограма перемальовування.
Використовувані зовнішні змінні: step - крок, ns - кількість міст, i - лічильник, vet [i] - запис вершини з її координатами.
Підпрограма procedure TForm1.Button10Click (Sender: TObject)
Вхідні дані: покажчик на що викликає об'єкт * Sender;
Вихідні дані: ні;
Процес обробки: осередки матриці суміжності обнуляються через лічильник, після чого викликається підпрограма перемальовування Button9.Click.
Використання зовнішніх змінних: i - лічильник, n - кількість міст.
Підпрограма procedure TForm1.Button11Click (Sender: TObject)
Вхідні дані: дані з матриці суміжності, дані з 2-х лічильників на формі;
Вихідні дані: дані матриці досяжності;
Процес обробки: через цикл за допомогою матриці суміжності створюється матриця досяжності, після чого через цикл йде зміна матриці досяжності за алгоритмом Флойда. Після цього йде перевірка через умова на досяжність із заданого міста А в...
