Question

В результате выполнения фрагмента программы на экран должно быть выведено значение n! 1 2 3 … n. Выберите правильный фрагмент из приведённых ниже. В остальных программах укажите строки, в которых, по вашему мнению, содержится ошибка. Ответ: _______.

1)var i,n:integer; begin read(n); for i:=1 to 10 do begin n:=n*i; writeln(n); end; end.

3)var i,n,p:integer; begin read(n); for i:=2 to n do p:=p*i; writeln(p); end.

2)var i,n,p:integer; begin read(n); p:=1; for i:=2 to n do p:=p*i; writeln(p); end.

4)var i,n,p:integer; begin read(n); p:=1; for i:=1 to n do begin p:=p*i; writeln(p); end; end.

Answer 1

В первых двух программах будет выведено 0 (надо задать начальное n=1)
в третьем распечатываются промежуточные значения, начиная со второго, хотя последний ответ правильный
В последнем выдается правильный ответ по условию задачи