uses Robot;
begin
Task('cif1');
while FreeFromRight do
right;
if WallFromUp then paint
end
end.
Объяснение:
картинки
