Лабиринт в pascal

Решение задачи на pascal в lazarus

Поиск оптимального пути в лабиринте.

Пусть дана квадратная сетка N*N. Ячейки сетки случайным образом пронумерованы: 0 — ячейка свободна для продвижения; 1 — ячейка заблокирована для продвижения. Начало движения — левый верхний угол. Конец движения — правый нижний угол. Движение возможно только вправо или вниз. Если движение невозможно до конца (правый нижний угол) — лабиринт непроходной!

Провести серию экспериментов. Среди конфигураций с возможным прохождением найти средние величины: количество проходных лабиринтов; минимальное количество ячеек для прохождения лабиринта. Использовать пользовательские модули.