СОставить программу вычисления суммы 1!+2!+3!_...+n!(n меньше 15)

СОставить программу вычисления суммы 1!+2!+3!_...+n!(n<15)
Гость
Ответ(ы) на вопрос:
Гость
Ответа нет, значит будет Паскаль... var   n,i,p,s:longint; begin   Write('Введите значение n<15 -> ');   Readln(n);   p:=1; s:=0;   for i:=1 to n do   begin p:=p*i; s:=s+p end;   Writeln('Сумма факториалов равна ',s) end. Тестовое решение: Введите значение n<15 -> 5 Сумма факториалов равна 153
Не нашли ответ?
Ответить на вопрос
Похожие вопросы