Дано натуральное число N. Разработать схему алгоритма для вычисления суммы ряда: S=1!+2!+3!+ ...+N! (N>1)

Операцию вычисления факториала использовать нельзя!

Протестировать алгоритм для N=3 и N=5

писать на Pascal'e

Question

Информатика

Авий

18 сентября, 12:18

Дано натуральное число N. Разработать схему алгоритма для вычисления суммы ряда: S=1!+2!+3!+ ...+N! (N>1)

Операцию вычисления факториала использовать нельзя!

Протестировать алгоритм для N=3 и N=5

писать на Pascal'e

+5

Ответы (1)

Знаете ответ на вопрос?

Атаула · Answer 1

var

f, s: longint;

n, i: byte;

begin

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

f: = 1;

for i:=2 to n do

begin

f: = f * I;

s:=s+f;

end;

writeln ('Summ = ', s) ;

end.