Тест по теме циклы
Список вопросов теста
Вопрос 1
Сколько раз выполнится тело цикла? For k:=2 to 7 write('задание 1');
Вопрос 2
Какое значение примет переменная х после выполнения фрагмента программы? x:=1; while x<10 do begin x:=x+3; x:=x+1; end;
Вопрос 3
Сколько раз выполнится тело цикла for i:=2 to 5 do x:=6;?
Вопрос 4
Какое значение примет переменная y после выполнения фрагмента программы? y:=1; while y<100 do begin y:=y*2; end;
Вопрос 5
Какое значение примет переменная х после выполнения фрагмента программы? x:=1; while x<10 do x:=x+3; x:=x+1;
Вопрос 6
Что выведется на экран в результате выполнения фрагмента программы: p:=1; for k:=5 downto 1 do p:=p*k; write(p);
Вопрос 7
Что выведется на экран в результате выполнения фрагмента программы: s:=0; for j:=10 to 15 do s:=s+2*j; writeln(s);
Вопрос 8
Определите значение пеpеменной S после выполнения операторов: i:=0; S:=0; Repeat i:=i+1; S:=S+i*i; Until i >= 3;
Вопрос 9
Определите значение пеpеменной sum после выполнения программы:
var i, sum: integer;
begin
sum:=0; i:=1;
while i<=3 do begin
sum:=sum+i; i:=i+1; end;
writeln(sum); end.


