Контрольная работа по теме «Циклы и ветвление»

Итоговая контрольная работа по теме «Циклы и ветвление»
Вариант №1
Соотнесите оператор и цикл, в котором он используется
А) while1) цикл с параметром
Б) repeat2) цикл с предусловием
В) For 3) цикл с постусловием
В каком цикле операторы могут не выполниться ни разу?
А) с постусловием Б) с предусловием В) с параметром
Выберите верный формат записи цикла с предусловием
А) repeat операторы; until <условие>
Б) while <условие> until операторы;
В) while <условие> do операторы;
Г) repeat операторы; do <условие>;
Какой из приведенных операторов организует цикл со счетчиком
А) For i:=1 to 10 downto операторы;
Б) while <условие> do операторы;
В) For i:=10 to N do операторы;
Г) repeat операторы until <условие>;
Где цикл записан С ОШИБКОЙ
А) For i=1 to 10 do x:=x+1;
Б) For i:=1 to N do y:=y/2;
В) For i:=10 to 1 downto x:=x+y;
Г) For i:=1 to 15 do x:=sqr(x); y:=sqr(y);
Напишите, что будет выведено на экран после выполнения фрагмента программы
А) y:=0; for i:=1 to 9 do y:=y+1; writeln (y);
Определите значение переменной «a» после выполнения фрагмента программы:
a := 10; b := 3; if a > b then b := b + 12 else a := a - 7;
Дана программа:
Program T21;
Var X: Integer;
Begin
Readln(X);
If X MOD 5=0 Then Writeln(‘ДА’)
Else Writeln (‘НЕТ’) ;End.
При каком значении X будет получен ответ “ДА”?
А) 7; Б) 14;В) 51; Г) 36;Д) 20.
Сколько раз будет исполнен и каков результат цикла в фрагменте программы
a: =1;
b: =1;
while a+b<8 do
begina: =a+1;b: =b+2;
end;
Какое значение примет переменная Y после выполнения программы?
А) Var Y,X: integer;
Begin
Y:=1; X:=15;
Repeat
Y:=Y*x;
X:=X-3;
Until x<5;
Writeln (‘Y=’,Y);
End.
Б) Var y,x:integer;
Begin
y:=0; x:=10;
while x>0 do
begin
x:=x-2;
y:=y+x;
end;
writeln (‘y=’,y);
end.
Итоговая контрольная работа по теме «Циклы и ветвление»
Вариант №2
Соотнесите оператор и цикл, в котором он используется
А) while1) цикл с заданным количеством повторений
Б) repeat2) цикл с постусловием
В) For 3) цикл с предусловием
В каком цикле операторы выполняться обязательно хотя бы один раз?
А) с постусловием Б) с предусловием В) с параметром
Выберите верный формат записи цикла с постусловием
А) repeat операторы; until <условие>;
Б) while <условие> until операторы;
В) while <условие> do операторы;
Г) repeat операторы; do <условие>
Какой из приведенных операторов организует цикл со счетчиком
А) while <условие> do операторы;
Б) For i:=1 to 10 do операторы;
В) For i:=10 to N do операторы;
Г) repeat операторы until <условие>;
Где цикл записан БЕЗ ОШИБОК
А) For i:=1 to 10 do x:=x+1; y:=sqr(y);
Б) For i:=1 to N do y:=y/2;
В) For i:=10 to 1 downto x:=x+y;
Г) For i:=1 to 15 do begin x:=sqr(x); y:=sqr(y); end;
Напишите, что будет выведено на экран после выполнения фрагмента программы
А) for i:=1 to 4 do writeln (i);
Определите значение переменной «a» после выполнения фрагмента программы:
a := 10; if a > 5 then a := 12;
Дана программа:
Program В100;
Var X: Integer;
Begin
Readln(X);
If X MOD 4=0 Then Writeln (‘ДА’)
Else Writeln (‘НЕТ’) ;End.
При каком значении X будет получен ответ “ДА”?
А) 14; Б) 34;В) 16; Г) 21; Д) 30.
Сколько раз будет исполнен и каков результат цикл в фрагменте программы
p: =20;
repeatp: =p*0.1
until p<0.1;
Какое значение примет переменная Yи S после выполнения программы?
А) Var Y,X: integer;
Begin
Y:=1; X:=10;
Repeat
Y:=x*x;
X:=X-2;
Until x<=0;
Writeln (‘Y=’,Y);
End. Б) Var s:real;
i:ineget;
s:=0;
i:=5;
while i>2 do i:=i-1;
s:=s+i*i;
writeln (‘s=’,s);
end.