Циклы
Список вопросов теста
Вопрос 1
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s:=0;
k:=1;
while k < 11 do begin
s:=s+k;
k:=k+1;
end;
write(s);
end.
Варианты ответов
- 45
- 55
- 65
Вопрос 2
Запишите число, которое будет напечатано в результате выполнения программы.
var s, n: integer;
begin
s := 33;
n := 1;
while s > 0 do begin
s := s – 7;
n := n * 3
end;
writeln(n)
end.
Варианты ответов
- 243
- 81
- -7
Вопрос 3
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s:=0;
k:=0;
while s < 100 do begin
s:=s+k;
k:=k+4;
end;
write(k);
end.
Варианты ответов
- 36
- 28
- 32
- 16
Вопрос 4
Алгоритм, в котором команда или серия команд повторяется многократно, называется
Варианты ответов
- циклическим
- линейным
- разветвляющим
Вопрос 5
Укажите оператор цикла с известным числом повторений:
Варианты ответов
- BEGIN
- WHILE
- REPEAT
- FOR
Вопрос 6
Параметр цикла For может получить значения…
Варианты ответов
- 2,3,4,5;
- 2,4,6,8,10;
- 1,3,5,7,9
Вопрос 7
Сколько раз будет выполняться цикл for i:=7 to 12 do…;
Варианты ответов
- 5
- 6
- 4
Вопрос 8
Сколько раз будет выполняться цикл for i:=4 downto 1 do <тело цикла>;
Варианты ответов
- 1
- 3
- 4
Вопрос 9
Какие значения t и k выведутся на экран в результате исполнения следующего фрагмента программы:
t:=0; k:=0;
for i:= 2 to 4 do
begin
t:=t+1;
k=k-1:
end;
writeln (t,k);
Варианты ответов
- 3, -3
- 4, -4
- 2, -2
- 0, 0
Вопрос 10
Какой алгоритм реализован в программе:
Program prim2;
var a,b,c: integer;
begin
b:=1;
for c:=1 to 5 do
begin
readln(a);
b:=b*a;
end;
writeln(b);
end.
Варианты ответов
- нахождение минимального значения
- нахождение произведения введенных с клавиатуры чисел
- нахождение максимального значения


