Что будет на экране после выполнения программы

var i,n,p:integer;

begin

read(n);

p:=1;

for i:=2 to n do

p:=p*i;

writeln(p);

end.

НастяБлог    3   24.04.2020 11:06    1