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

var i,n,p:integer;

begin

read(n);

p:=1;

for i:=2 to n do

p:=p*i;

writeln(p);

end.

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку