Размер шрифта
A- A+
Межбуквенное растояние
Цвет сайта
A A A A
Изоображения
Дополнительно

Робот - if тест

Вариант 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.

Разделы сайта