Uses robot;
Begin
Task('cc13') ;
Пожалуйста дайте ответ
Приложения:

Ответы на вопрос
Ответил vlaDen74
0
Ответ:
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.
Новые вопросы
Русский язык,
2 года назад
Английский язык,
2 года назад
Физкультура и спорт,
2 года назад
Математика,
8 лет назад