Вариант 1
Дана обстановка на поле Робота:
В какой клетке окажется Робот после выполнения следующей программы:
1.
uses Robot;
begin
field(5,5);
if WallFromUp
then right
else left;
end.
2.
uses Robot;
begin
field(5,5);
if FreeFromUp
then right
else left;
end.
3.
uses Robot;
begin
field(5,5);
if WallFromDown
then right
else left;
end.
4.
uses Robot;
begin
field(5,5);
if FreeFromDown
then right
else left;
end.
5.
uses Robot;
begin
field(5,5);
if CellIsPainted
then right
else left;
end.
6.
uses Robot;
begin
field(5,5);
if CellIsFree
then right
else left;
end.
7.
uses Robot;
begin
field(5,5);
if WallFromUp
then begin right;right;up; end
else begin left;left;up; end
end.
8.
uses Robot;
begin
field(5,5);
if FreeFromUp
then begin right;right;up; end
else begin left;left;up; end
end.
9.
uses Robot;
begin
field(5,5);
if WallFromUp and FreeFromDown
then begin right;right;up; end
else begin left;left;up; end
end.
10.
uses Robot;
begin
field(5,5);
if CellIsFree
then begin right;right;up; end
else begin left;left;up; end
end.
Вариант 2
Дана обстановка на поле Робота:
В какой клетке окажется Робот после выполнения следующей программы:
1.
uses Robot;
begin
field(5,5);
if WallFromUp
then down
else right;
end.
2.
uses Robot;
begin
field(5,5);
if FreeFromUp
then down
else right;
end.
3.
uses Robot;
begin
field(5,5);
if WallFromDown
then right
else left;
end.
4.
uses Robot;
begin
field(5,5);
if FreeFromDown
then down
else right;
end.
5.
uses Robot;
begin
field(5,5);
if CellIsPainted
then down
else right;
end.
6.
uses Robot;
begin
field(5,5);
if CellIsFree
then down
else right;
end.
7.
uses Robot;
begin
field(5,5);
if WallFromUp
then begin down;down;right; end
else begin down;down;left; end
end.
8.
uses Robot;
begin
field(5,5);
if FreeFromUp
then begin down;down;right; end
else begin down;down;left; end
end.
9.
uses Robot;
begin
field(5,5);
if WallFromUp and FreeFromDown
then begin down;down;right; end
else begin down;down;left; end
end.
10.
uses Robot;
begin
field(5,5);
if CellIsFree
then begin down;down;right; end
else begin down;down;left; end
end.