Ответ:
uses Robot;
begin
Task('if8');
if wallfromup then
down;
paint;
if freefromdown then
end
end;
if wallfromleft then
right;
if freefromright then
end.
решение во вложении, Вам нужна только первая страница