0 / 0 / 0
Регистрация: 29.04.2018
Сообщений: 11
1

Вычисление суммы факториала

16.10.2019, 08:26. Показов 920. Ответов 5
Метки нет (Все метки)

Помогите с задачей. Если можно то с пояснениями, чтобы разобраться. Дано число n. Вычислите сумму: 1! + 2! + 3! + ... +n!, Создав функцию вычисления факториала числа.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.10.2019, 08:26
Ответы с готовыми решениями:

Вычисление факториала и вычисление степени числа
Нужно проверить правильность сделанной программы если не правильно помогите исправить. Var...

Вычисление двойного факториала
Помогите пожалуйста,исправить ошибку. Вычисление двойного факториала (2n+1)!! (например...

Вычисление факториала в графике
Реализовать с графическим интерфейсом вычисление факториала ( рекурсивно и генерационно ) ...

Вычисление факториала, возведение в степень
Определите y, разработав две функции (вычисление факториала, возведение в степень): ...

5
Почетный модератор
64276 / 47575 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
16.10.2019, 08:48 2
Здесь функция не нужна, все считается в одном цикле.
Pascal
1
2
3
4
5
6
7
s:=0;
f:=1;
for i:=1 to n do
 begin
   f:=f*i;
   s:=s+f;
 end;
0
0 / 0 / 0
Регистрация: 29.04.2018
Сообщений: 11
16.10.2019, 08:54  [ТС] 3
Цитата Сообщение от Puporev Посмотреть сообщение
Здесь функция не нужна, все считается в одном цикле.
Pascal
1
2
3
4
5
6
7
s:=0;
f:=1;
for i:=1 to n do
 begin
   f:=f*i;
   s:=s+f;
 end;
Так задание заключается в том, чтобы именно создать функцию и вычислить сумму факториала
0
Почетный модератор
64276 / 47575 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
16.10.2019, 08:57 4
Ну делайте, функцию найдете хоть на форуме, хоть просто в инете. Но считать каждый факториал с 1 глупо если каждый факториал вычисляется последовательно в цикле. Я в глупостях не участвую.
0
2373 / 775 / 561
Регистрация: 15.01.2019
Сообщений: 2,394
16.10.2019, 21:52 5
Pascal
1
2
3
4
5
6
7
function fact(x:byte):real; 
begin 
  if x=0 then 
    fact:=1 
  else 
    fact:= fact(x-1)*x; 
end;
0
12 / 8 / 5
Регистрация: 15.10.2019
Сообщений: 25
17.10.2019, 20:39 6
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function Factorial(n: integer): integer;
begin
  if n >= 3 then 
    Result := n * Factorial(n - 1) else Result := n
end;
 
var
  n, p: integer;
 
begin
  readln(n);
  for var i := 2 to n do
    P += Factorial(i);
  write(p);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.10.2019, 20:39
Помогаю со студенческими работами здесь

Вычисление факториала с использованием рекурсии
function Factrl (n: integer): longint; begin if n = 0 then Factrl:= 1; if n = 1 then ...

Вычисление факториала с использованием функции
function fact(n:byte):integer; var k : longint; j : byte; begin k:= 1; for j:= 2 to n do...

Вычисление факториала с помощью рекурсии
Составление и отладка программы с внешними модулями. Написать внешний модуль для вычисления с...

Вычисление факториала числа с использованием рекурсии
Очень срочно нужно, помогите если кто знает. Задача 11 Вычисление факториала числа с...

Вычисление факториала целого положительного числа
Составить реккурсивную подпрограмму функцию для вычисления факториала целого положительного числа....

Оформить вычисление факториала в виде процедуры
1. Вычислить выражение у = 1!+2!+3!+... + n!. Оформить вычисление факториала в виде проце-дуры. 2....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru