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

begin

a:=a*b;

b:=b+1;

end;