В результате выполнения фрагмента программы на экран должно быть выведено значение 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.
Ответ: 4) строки 7 и 8 - в них выводится текущее значение переменной p на каждой итерации цикла, а не конечное значение n!.