Категория - Информатика Автор - blacklord1999 10 лет назад Вычислить сумму 1! + 2! + 3! + ... + n! (значение n вводится с клавиатуры; 1 < n ≤ 10).Решать через While или Repeat
Категория - Информатика Автор - blacklord1999 10 лет назад Вычислить сумму 1! + 2! + 3! + ... + n! (значение n вводится с клавиатуры; 1 < n ≤ 10).Решать через While или Repeat
Ответ Автор - falcon22 vari,n,f,s:int64;beginread(n);i:=0;f:=1;while i<>n do begin i:=i+1; f:=f*i; s:=s+f; end;writeln(s);end.