Дано натуральное число N. Разработать схему алгоритма для вычисления суммы ряда: S=1!+2!+3!+..N! (N больше 1)
Дано натуральное число N. Разработать схему алгоритма для вычисления суммы ряда: S=1!+2!+3!+..N! (N>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.
Не нашли ответ?
Похожие вопросы