Небольшая курсовая работа на delphi – робот самостоятельно находит путь из лабиринта. Вы можете указать начальное положение робота в лабиринте, максимальное количество повторных посещений роботом одной и той же точки и скорость, с которой робот будет перемещаться по лабиринту. Робот обозначен красным квадратиком.
Скриншот программы
Программа написана еще в Delphi 5, но без проблем открывается и в популярной Delphi 7. Лабиринт задан в виде массива, Вы можете самостоятельно изменить его. Все происходящее отрисовано непосредственно на canvas главной формы.
В архиве включены все исходники, Вы можете скачать его абсолютно бесплатно:
Delphi :: лабиринт
Готовая программа вместе с исходниками :: labirint.rar