Предмет: Информатика,
автор: nastuxxw
Робот должен закрасить поле размером 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.
Приложения:
Похожие вопросы
Предмет: Русский язык,
автор: gulmirakamilova33
Предмет: Кыргыз тили,
автор: omurkulovtaalajbek
Предмет: Українська література,
автор: wullai
Предмет: Другие предметы,
автор: Аноним
Предмет: География,
автор: kostyaxantonow09
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.\