использовать Робот
алг в клетку Б
дано |  Робот в клетке А
надо |  Робот в клетке Б
|    |и все отмеченные клетки закрашены
нач

закрасить вверх(длина коридора)
нц пока справа свободно
вправо
закрасить вверх(длина коридора)
кц
кон

алг цел длина коридора
дано | Возможно, снизу от робота коридор
надо | Посчитано количество клеток коридора
|    |и робот вернулся туда где был.
нач
цел шагов=0
нц пока снизу свободно
вниз
шагов := шагов + 1
кц
нц шагов раз
вверх
кц
знач:=шагов
кон

алг закрасить вверх(цел клеток)
дано | Сверху от робот есть не закрашенные клетки
надо | Робот закрасил необходимое количество клеток
|и вернулся
нач
нц клеток раз
вверх
закрасить
кц
нц клеток раз
вниз
кц
кон