Программа поиска соединительного пути в 3-звенной КС. Алгоритм решения программы. Анализ полученных результатов, страница 3

ВЫВОД: Возможности Delphi подходят при решении задач, подобных  данной в задании курсовой работы и отвечают всем требованиям алгоритмического и визуального программирования.

Сравнивать Delphi с аналогичными продуктами для Basic и СИ++ не имеет смысла, так выбор языка определяется только личными симпатиями программиста, т.е. «что лучше знаю, на том и буду писать».

4. Алгоритм решения программы.

Алгоритм реализации задачи можно представить следующим образом.

Рис.4.1. Алгоритм поиска свободного  соединительного пути в 3-звенной КС.

5. Анализ полученных результатов.

Для начала демонстрации программной организации поиска пути в трёхзвенной КС (режим свободного искания). Запускаем приложение Поиск пути в КП. ехе. Открывается окно такого плана: 

Затем, нажимаем кнопку «Задать начальные данные» и происходит заполнение массивов МСПЛ_АВ, МСПЛ_ВС, МСН. После формирования массивов нужно задать № АК и направление.

Задав №АК и направление, нажатием соответствующей кнопки, происходит поиск свободного пути в заданном направлении. Если соединительный путь найден, то заданный № АК записывается в буфер заявок БЗ ППК. В противном случае (путь не найден) № АК записывается в БЗ КПЗ. (Для примера АК-6 в направлении Н1).

Далее, для большей наглядности маршрута, полученного при поиске свободного СП в заданном направлении,  выделим его (нажав на кнопку «Выделить маршрут»). Потом данный маршрут можно занулить.

При нажатии кнопки «Занулить маршрут». единички (1) в во всех массивах заменятся на нолики (0) для полученного маршрута, тем самым показав, что выход в данном направлении занялся.

Для просмотра графического представления прохождения маршрута от АК до свободного выхода в заданном направлении (АК-10 в направлении Н3).

Для остальных заявок последовательность действий будет аналогична. Проделав 8 раз поиск свободного пути в заданном направлении можно очистить все массивы и буферы и начать заново. 

Выполнив данную последовательность действий, можно легко понять принцип свободного пути в 3-звенной КС.

Заключение.

В данной курсовой работе я реализовал программно «Организацию поиска свободного соединительного пути в трёхзвенной коммутационной системе». Данная программа  наглядно показываем весь процесс поиска свободного соединительного пути от известного АК до выхода в заданном направлении.

Данная задача была реализована на таком языке программирования, как Delphi, который позволяет реализовывать поставленные задачи в полной мере. Возможности Delphi подходят для решении подобных задач,  данной в задании курсовой работы и отвечают всем современным  требованиям алгоритмического и визуального программирования.

Список литературы.

1.  Мейкшан Л.И. Программная организация процесса поиска пути в трёхзвенном коммутационном поле. Методические указания по выполнению лабораторной работы. - Новосибирск.: СибГУТИ, 2001.

2.  Документация по Delphi.

3.  Материалы лекционных занятий по курсу «Информатика».

Приложение.

{Текст основной программы}

program POPPPVTKP;

uses

Forms,Unit1 in 'Unit1.pas',Unit2 in 'Unit2.pas'; {Подключаемы модули}

{$R *.res}

begin

Application.Initialize;                   {Создание приложения}

Application.CreateForm(TForm1, Form1);    {Создание первой формы приложения}

Application.CreateForm(TForm2, Form2);    {Создание второй формы приложения }

Application.Run;                          {Запуск приложения}

end.

{Модуль Unit1}

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Buttons, StdCtrls, Grids; {Список модулей}

Type                                 {Описание классов используемых компонентов}