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

Question

Информатика

Лавруня

2 августа, 05:53

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

+1

Ответы (1)

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

Грапа · Answer 1

Program Pr1;

uses crt;

var s, b:real;

i, a, n:integer;

Begin

clrscr;

writeln ('Vvedite N') ;

readln (n) ;

s:=0;

for i:=1 to n do begin

b:=1;

for a:=1 to i do b:=b*a;

s:=s+b;

end;

writeln (s) ;

end.