uses Robot;
begin
Task('c10');
for i:integer:=1 to 10 do
paint;
right;
end;
down;
left;
paint
end
end.
uses Robot;
begin
Task('c10');
for i:integer:=1 to 10 do
begin
paint;
right;
end;
down;
for i:integer:=1 to 10 do
begin
left;
paint
end
end.