Question

даю 20 баллов! пожалуйста, информатика​

Answer 1

Ответ:

5040

Объяснение:

Программа и результат в скрине)

var

n,i,nf: int64;

begin

write('Введите n》');

read(n);

nf:=1;

for i:=1 to n do

nf:=nf*i;

write('n!=',nf)

end.