uses Robot;
begin
Task('cif4');
while FreeFromRight do
right;
if WallFromUp and FreeFromDown then paint
end
end.
uses Robot;
begin
Task('cif4');
while FreeFromRight do
begin
right;
if WallFromUp and FreeFromDown then paint
end
end.