В результате выполнения фрагмента программы на экран должно быть выведено значение 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.