Uses robot;
Begin
Task('cc13') ;
дайте ответ

Uses robot;

var i,j,k,a,b:integer;

Begin

Task('cc13');

a:=12; b:=10;

for i:=0 to 3 do

begin

for j:=0 to a do right;

a:=a-2;

Down;

for k:=0 to b do left;

b:=b-2;

Paint;

Down;

end;

end.

8, 1, 4, 1, 5, 9, 6, 7, 2

бег-бог-лог-лаг-шаг

бант-кант-карт-кара-кора-коса

шар-бар-бам-бум-кум-куб

муха-мура-фура-фора-кора-корн-коан-клан-клон-слон

миг-маг-мак-бак-бек-век