Робот должен закрасить поле размером 9х9 «в клетку».программа abc pascal. буду очень благодарна!
Только в конце символ "\" уберите, он случайно нажался
спасибо большое
Пожалуйста. Добавлю тогда в ответ.
Ответы
Ответ дал:
0
Программа для исполнителя Робот в PascalABC.NET:
Uses Robot;
begin
Field (9,9);
While FreeFromleft do
left;
While FreeFromUp do
up;
loop 5 do
begin
loop 4 do
begin
paint;
right;
right;
end;
paint;
if FreeFromDown then
begin
While FreeFromleft do
left;
down;
down;
end;
end;
end.
Приложения:
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад
Uses Robot;
Begin
Field (9,9);
While FreeFromleft do
left;
While FreeFromUp do
up;
loop 5 do
begin
loop 4 do
begin
paint;
right;
right;
end;
paint;
if FreeFromDown then
begin
While FreeFromleft do
left;
down;
down;
end;
end;
end.\