Morgas
4 год назад
в системе программирования Pascal ABC выполните проверяемое задание if1 для исполнителя Робот(обойти препятствиеи попасть в отмеченную клетку).Расположение стен на поле может быть разным.
ОТВЕТЫ
Rosica
Oct 24, 2020
Так?
uses Robot;
begin
Task('if1');
right;
if WallFromUp then
begin
down;
right;
up;
end;
if wallfromdown then
begin
up;
right;
down;
end;
paint;
end.
uses Robot;
begin
Task('if1');
right;
if WallFromUp then
begin
down;
right;
up;
end;
if wallfromdown then
begin
up;
right;
down;
end;
paint;
end.
- только скажи как
470
Смежные вопросы:
