Оператор цикла FOR Вариант 4

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

x:=5; for i:=-1 to 5 do

x:=x+1;

3. Сколько раз будет выполнен цикл и что будет выведено на печать?

var k, i: integer; begin

k:=0; for i:=-10 to -9 do

k: =i; write (k) ; end.

4. Определите, что будет напечатано в результате выполнения следующего фрагмента

программы:

var k, s: integer; begin

s:=2; for k:=5 to 12 do

s:=s+k; write (s) ;

end.

5. Определить значение переменной s после выполнения следующего фрагмента программы:

Var s; real; i : integer; begin s := 0; for i := 1 to 4 do

begin s := s*10 ; s := s + I end; end.

6. Что выведется на экран в результате выполнения фрагмента программы:

s:=0; for j:=10 to 15

s:=s+2*j; writeln(s);

7. Что выведется на экран в результате выполнения программы:

for I:=1 5 do

begin

A:=2*1+1;

B:=4*I;

end; WRITELN(A, B);

8. Что выведется на экран в результате выполнения программы:

for I:=5 downto 1 do

BEGIN

A:=3*1+1;

B:=4*I end;

writeln(a, b);

9. Написать программу, которая печатает в столбик следующие числа: 2.1 2.2 2.3 … 2.8.