1!+2!+3! + ... + n!

нужно написать на Паскале, понять не могу

Question

Информатика

Зарина

16 сентября, 23:18

1!+2!+3! + ... + n!

нужно написать на Паскале, понять не могу

+2

Ответы (1)

Знаете ответ?

Венуста · Answer 1

var n: integer;

k, s, m: int64;

begin

write ('n = ') ; readln (n) ;

k:=1; s:=0; m:=1;

repeat

m:=m*k;

s:=s+m;

k:=k+1;

until k>n;

writeln ('сумма: ', s) ;

end.

n = 5

сумма: 153

1!+2!+3! + ... + n!нужно написать на Паскале, понять не могу

1!+2!+3! + ... + n!

нужно написать на Паскале, понять не могу