СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Оператор цикла с предусловием (цикл "While")

Внимание! Все тесты в этом разделе разработаны пользователями сайта для собственного использования. Администрация сайта не проверяет возможные ошибки, которые могут встретиться в тестах.
Тест предназначен для входного контроля для проверки уровня усвоения начальных понятий по теме "Оператор цикла с предусловием"

Список вопросов теста

Вопрос 1

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Определить, сколько раз исполнятся команды цикла.

Варианты ответов
  • 5
  • 4
  • 0
  • Бесконечное количество раз
Вопрос 2

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Определить, какими будут значения переменных x, y после окончания цикла.

Варианты ответов
  • x=4 y=16
  • x=3 y=9
  • x=1 y=1
  • x=2 y=4
Вопрос 3

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Что произойдёт, если из тела цикла убрать команду x:=x+1;?

Варианты ответов
  • Ничего не изменится
  • Цикл не выполнится
  • Зацикливание
  • Появится сообщение об ошибке
Вопрос 4

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Сколько раз исполнятся команды цикла, если изменить условие на x<=5?

Варианты ответов
  • 4
  • 5
  • Произойдёт зацикливание
  • Появится сообщение об ошибке
Вопрос 5

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Сколько раз исполнятся команды цикла, если изменить условие на x>=5?

Варианты ответов
  • Цикл не выполнится ни разу
  • Появится сообщение об ошибке
  • Произойдёт зацикливание
  • 4
Вопрос 6

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Сколько раз исполнятся команды цикла, если изменить условие на x>0?

Варианты ответов
  • Появится сообщение об ошибке
  • Цикл будет выполнятся бесконечно
  • 0
  • Цикл не выполнится ни разу
Вопрос 7

Дана программа.

var x,y: integer;

begin

  x:=1;

  while x<5 do

  begin

    y:=x*x;

    writeln ('x=',x, ' y=',y);

    x:=x+1;

  end;

end.

Сколько раз исполнятся команды цикла, если изменить изменить команду x:=x+1; на команду x:=x-1;?

Варианты ответов
  • 4
  • Цикл не будет выполняться
  • Появится сообщение об ошибке
  • Произойдет зацикливание
Сохранить у себя:

Вебинар для учителей

Свидетельство об участии БЕСПЛАТНО!