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

[=stay=]

В паскале поле состоит из 25 клеток. Есть начальная клетка, в которой находится сам робот. Справа, слева, снизу или сверху от него располагается стена. Неважно где она будет располагаться. Надо написать программу, которая закрашивает клетку, противоположную стене. Вот начало
uses Robot;

begin
Task('if4');


можно просто если у кого-то есть паскаль abc.net посмотреть задание RBif4 и так легче будет решить. Спасибо хотя бы за просмотр)

[Mad_Cat]

вот же хрень

uses Robot;

begin
Task('if4');
if WallFromright then Left;
if WallFromLeft then Right;
if WallFromUp then Down;
if WallFromDown then Up;
Paint;
end.