4. Найдите ошибки в записи фрагмента программы: a:=1; b:=1; read(n); while...

Question

4. Найдите ошибки в записи фрагмента программы: a:=1; b:=1; read(n); while b begin a:=a*b; b:=b+1; end;

Answer 1

Ответ:

Условие задано неверно в строке while b begin

Пример:

a:=1;

b:=1;

read(n);

while (b<10) do</strong>

begin

a:=a*b;

b:=b+1;

end;