Question

Решение 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;

Answer 1

1. 2 раза, a=3, b=5, s=8;
2. a=4, b=2;
3. s=100;

4.
k := 1; f := 0;
While k<n Do 
begin
   f := f * k;
   k := k + 1;
end;

5.
p := n;
a := 0;
i := 1;
While p>0 Do
Begin
a := a + 10 * i * p Mod 10;
p := p Div 10;
inc(i);
End;