Вариант №1

Вариант №1

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

1.

Var k: real; i: integer;

k:=2; i:=5;

while i>2 do i:=i-1; k:=k+i*i;

2.

Var k: real; i: integer;

k:=2; i:=2;

repeat i:=2*i; k:=k+i until i>5;

3.

Var k: real; i: integer;

k:=2; i:=1;

while i<5 do i:=i+1; k:=k+1*i;

4.

Var k: real; i: integer;

k:=2; i:=1;

while i>1 do k:=k+1/i; i:=i-1 end;

5.

Var k: real; i: integer;

k:=2; i:=5;

repeat i:=2*I; k:=k+i; until i>5;

6.

Var k: real; i: integer;

k:=2; i:=1;

repeat k:=k+1/i; i:=i-1 until i<=1;

Назовите номера заданий, где использован цикл с предварительным условием, с последующим условием.

Изобразить блок-схемы циклов для задание №3, №4.

Вариант №2

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

1.

Var s: real; i: integer;

s:=4; i:=5;

while i>2 do i:=i-1; s:=k+i*i;

2.

Var s: real; i: integer;

s:=2; i:=2;

repeat i:=2*i; s:=s+i until i>7;

3.

Var s: real; i: integer;

s:=2; i:=1;

while i<4 do i:=i+1; s:=s+1*i;

4.

Var s: real; i: integer;

s:=2; i:=1;

while i>1 do s:=s+1/i; i:=i-1 end;

5.

Var s: real; i: integer;

s:=2; i:=5;

repeat i:=2*I; s:=s+i; until i>5;

6.

Var s: real; i: integer;

s:=2; i:=1;

repeat s:=s+1/i; i:=i-1 until i<=1;

Назовите номера заданий, где использован цикл с предварительным условием, с последующим условием.

Изобразить блок-схемы циклов для задание №3, №4.

	шаг условие i
	шаг условие i
	шаг условие i
	шаг условие i
	шаг условие i
	шаг условие i