Информатика

Афинодор

5 марта, 15:52

Решение задач

1 Дана

последовательность операторов:

a : = 1; b : = 1;

while a + b < 8 do Begin a : = a + 1; b : = b + 2 End;

s : = a + b

Сколько раз будет повторен цикл и какими

будут значения переменных a, b и s после

завершения этой последовательности операторов?

2 Какими

будут значения переменных a и b после

выполнения операторов:

a : = 1; b : = 1;

While a < = 3 Do a : = a + 1; b : = b + 1.

3 Определить

значение переменной s после выполнения следующих

операторов:

s : = 0; i : = 0; While

i<5 Do Inc (i); s : = s + 100 Div i;

s : = 0; i : = 1; While

i>1 Do Begin s : = s + 100 Div i; dec (i) End;

4 Дана

последовательность операторов, вычисляющих факториал f числа n:

k : = 1; f : = 0:

While k=0 Do

Begin

a : = a + p Mod 10;

p : = p Div 10

End;