Реферат Визначення досяжності міста в змінюваною системі двосторонніх доріг

Тема: Курсовые обзорные

s <2 then exit;; i: = 1 to pos dodost [izver-1, i-1] <> 0 then: = true;. Label5. Caption: = 'Всі міста досяжні';;: = Round ((doroga-pos)/(5 * pos));: = Round (vver/pos); (doroga <= 3) and ((vver <5) or (vver = 6) or (vver = 10)) theni: = 1 to pos doj: = 1 to pos +1 dodost [izver-1, j-1] = 0 then.StringGrid3.Cells [izver, j]: = '1 ';. StringGrid3.Cells [j, izver]: = '1';

Form1.Label5.Caption: = 'Всі міста досяжні';

result: = true;;; j: = 1 to pos dodost [izver-1, j-1] = 0 then.StringGrid3.Cells [izver, j]: = '1 ';. StringGrid3.Cells [j, izver]: = '1 ';

Form1.Label5.Caption: = 'Всі міста досяжні';

Matrix;;; begin: = false;. Label5.Caption: = 'Не всі міста досяжні';;; TForm1.Button12Click (Sender: TObject); i, j: integer; (Form1. izver.Value); result then redrow_result_true else redrow_result_false;;. Unit2;// модуль форми 2 В«Про програмуВ», Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls; = class (TForm): TLabel; Label1Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm2;

{$ R *. dfm} TForm2.Label1Click (Sender: TObject);;;. Unit3;// модуль форми 3 В«ЗавданняВ», Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, unit1; = class (TForm): TButton;: TLabel; Button1Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm3;

{$ R *. dfm} TForm3.Button1Click (Sender: TObject);;;. Unit4;// модуль форми 4 В«заставочную формаВ», Messages, SysUtils, Variants, Classes, Graphics, Controls , Forms,, ExtCtrls, StdCtrls; = class (TForm): TTimer;: TButton;: TLabel;: TImage; Button1Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm4;

{$ R *. dfm} TForm4.Button1Click (Sender: TObject);. Timer1.Enabled: = false;

close;;.

Додаток Б

Блок-схеми основних підпрограм.

1. Досяжність до всіх міст (підпрограма procedure Dostizhimost (izver: integer))

В
В
В
В
В
В В
В
В
В
В В В

2. Побудова матриці досяжності по матриці суміжності (підпрограма Matrix)

В
В В
В
В
В
В В

Додаток В

Опис зовнішнього вигляду користувальницького інтерфейсу