Цель работы: Разработать программу, осуществляющую нахождение пути от одного населённого пункта к другому.
    
    Введение
    
    В настоящее время индустрия производства компьютеров и программного обеспечения для них является одной из наиболее важных сфер экономики развитых стран. Ежегодно в мире продаются десятки миллионов компьютеров. Только в США объем продаж компьютеров составляет десятки миллионов долларов и постоянно продолжает расти.
    В чем же причины такого стремительного роста индустрии персональных компьютеров и их сравнительная выгодность для многих деловых применений? * Простота использования, обеспеченная с помощью диалогового способа взаимодействия с компьютером. * Относительно высокие возможности по переработке информации, наличие программного обеспечения, а так же мощных систем для разработки нового программного обеспечения.
    Использованная в отчёте программа может использоваться для решения задач, связанных с проложением маршрута дороги любого типа. Определение достижимости населённых пунктов.
    
    1.1 Анализ требований.
    
    В списке задаются города (населённые пункты), а также дороги между ними (есть или нет), необходимо разработать программу с использованием модульного программирования, осуществляющую нахождение кратчайшего пути между населёнными пунктами, задаваемыми пользователем в процессе работы программы.
    Решение поставленной задачи осуществляется следующим методом:
    Cтроится граф, вершины которого - населённые пункты, а ребра - дороги между ними.
    В процессе работы программы в данном графе с помощью рекуррентной процедуры находятся пути из одной вершины в другую. Данная процедура в качестве параметров получает массив пройденных вершин, текущую вершину и количество уже пройденных вершин. На каждом этапе процедура проверяет все, не пройденные достигнутые вершины, и либо находит заданный путь, если достигнута конечная вершина, либо вызывает саму себя для всех, не пройденных вершин.
    Для организации данного алгоритма используется две процедуры: процедура нахождения всего пути и рекурсивная процедура поиска единичного маршрута.
    Процедура нахождения всего пути осуществляет перебор всех населённых пунктов и вызов рекурсивной процедуры, которая осуществляет поиск маршрута между этими населёнными пунктами.
    Средства решения задачи: используются средства логического программирования языка Turbo Pascal 7.0.
    1.2 Проектирование.
    
    Для реализации поставленной задачи программа должна выполнять следующие функции:
    * Ввод данных пользователем с клавиатуры - вводятся названия населённых пунктов и дороги, соединяющие их;
    * Вывод данных - вывод на экран списка населённых пунктов и дорог, соединяющий их.
    * Запись в файл - запись в файл, имя которого указывает пользователь в диалоговом режиме, названия населённых пунктов и существующих дорог между ними в виде текстовой информации;
    * Считывание файла с диска, с именем, которое указывает пользователь в диалоговом режиме
    * Вывод результата - пользователь задаёт начальный и конечный населённый пункт, между которыми необходимо проложить путь, на экране появляется маршрут, либо сообщение: "маршрут не найден". ............