Циклы
Вариант 4.

1. Сколько единиц будет выведено на экран в результате работы программы:

for j := 0 to 3 do begin
  i := 2;
  while i <= 6 do begin
    i := i + 2;
    writeln ( '1' );
  end;
end;

2. Сколько единиц будет выведено на экран в результате работы программы:

for j := 0 to 3 do begin
  i := 2;
  while i <= 6 do begin
    i := i + 2;
  end;
  writeln ( '1' );
end;

3. Сколько раз выполнится этот цикл:

i := 2;
while  i<6  do begin
   i := i + 2;
end;

4. Сколько раз выполнится этот цикл:

i := 6;
while i > 2 do begin
   i := i - 1;
end;

5. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?

a:=10;
for i:=0 to 3 do begin
  a:=a-i;
end;

6. Чему будет равна переменная sum после выполнения фрагмента программы:
sum:=0; for i:=7 to 9 do sum:=sum+i;

7. Чему будет равна переменная sum после выполнения фрагмента программы:
sum:=0; for i:=5 to 8 do sum:=sum+i;

8. Сколько раз будет выполняться цикл For i:=7 to 12 do…:

9. Какое число будет выведено на экран в результате выполнения этого цикла?

i:=9;
write('9');
repeat
  write(i+2);
  i:=i+1;
until i>11;

10. Сколько раз исполнится следующий цикл:
i:=15;
Repeat
i:=i – 4
Until i<4;

11. Сколько раз исполнится следующий цикл:
i:=12; Repeat i:=i – 2 Until i>4;

12. Установите соответствие между общей формой и названием оператора. Цикл с постусловием:

13. Какое число будет выведено на экран в результате выполнения этого цикла?

i:=6;
write('9');
while i<5 do begin
  write(i);
  i:=i+1;
end;

14. Чему будет равно значение переменной a после выполнения этого цикла?

i:=4;
a:=12;
while i<4 do begin
  a:=a+i;
  i:=i+1;
end;

15. Чему будет равна переменная sum после выполнения фрагмента программы:
i:=15;
sum:=0;
While i>5 do begin
sum:=sum+i/5;
i:=i-5
end.

16. Цикл while в Паскале применяется для создания повторений с … заранее их числом: