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

Найти факториал

14.03.2010, 13:26. Показов 10686. Ответов 8
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста. как записать n! в паскаль. Тоесть у меня дробь и её надо ввести в паскаль сама дробь такая (2n+1)/(n!) как n! расписать?
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.03.2010, 13:26
Ответы с готовыми решениями:

Найти факториал 120
найти факториал 120!

Требуется найти факториал F=m!
Прошу помогите решить задачку!Оформить в виде функции SUMMA составить программу вычисления суммы...

Найти факториал, где n водится с клавиатуры
Ребят помогите пожалуйста у меня задание по иформатике. 1Заменить все положительные массивы на 0....

Найти факториал с помощью оператора repeat
помогите пожалуйста найти факториал с помощью оператора repeat (2*k+1)!

8
3132 / 1325 / 156
Регистрация: 19.12.2009
Сообщений: 1,808
14.03.2010, 13:34 2
Pascal
1
2
3
4
5
function fuct(n:integer):longint;
 begin
  if n=1 then fuct:=1;
   if n>1 then fuct:=n*fuct(n-1);
    end;
Можно это сделать и через цикл
Pascal
1
2
3
4
5
6
var 
p:longint;
...................
p:=1;
for k:=2 to n do
p:=p*k;
1
19 / 19 / 0
Регистрация: 08.12.2009
Сообщений: 29
14.03.2010, 13:37  [ТС] 3
И вот как мне ето вписать вместо скобки с N! помогите мне что вставлять к примеру вот ето
Pascal
1
2
3
4
5
function fuct(n:integer):longint;
 begin
  if n=1 then fuct:=1;
   if n>1 then fuct:=n*fuct(n-1);
    end;
в мою дробь?!(2n+1)/(n!) тоесть получиться
Pascal
1
2
3
4
5
(2n+1)/(function fuct(n:integer):longint;
 begin
  if n=1 then fuct:=1;
   if n>1 then fuct:=n*fuct(n-1);
    end;)
1
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
14.03.2010, 13:42 4
Если факториал в знаменателе, то его считают так.
Pascal
1
2
3
4
5
var f:real;
......
f:=1;
for i:=1 to n do
f:=f/i;
А потом в формуле уже не делят, а умножают.
1
3132 / 1325 / 156
Регистрация: 19.12.2009
Сообщений: 1,808
14.03.2010, 13:43 5
p4eLka, я не буду комментировать то, что Вы написали. Лучше почитайте учебник по Паскалю.
Ваша дробь вычесляется так:
Pascal
1
2
3
4
5
6
7
8
...............................
function fuct(n:integer):longint;
 begin
  if n=1 then fuct:=1;
   if n>1 then fuct:=n*fuct(n-1);
    end;
...............................
p:=(2*n+1)/fuct(n)
Добавлено через 38 секунд
Puporev, правда, просто человек просил рассписать именно факториал.
1
13208 / 6596 / 1041
Регистрация: 10.01.2008
Сообщений: 15,069
14.03.2010, 13:43 6
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
function factor(n:longint):longint;
var r:longint;
begin
    if n<=1 then factor := 1;
    else begin
        r := n;
        while n>2 do begin
            dec(n);
            r := r * n;
        end;
        factor := r;
    end;
end;
 
var n:longint;
begin
    write('n=');
    readln(n);
    writeln('n! = ', factor(n));
end.
1
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
14.03.2010, 13:47 7
Мужики, ну что вы привязались к целым числам? Ну посчитает он факториал до 12, а что дальше? Тем более ему вообще факториал не нужен. Лишний раз знаниями стандартных функций померяться?
2
19 / 19 / 0
Регистрация: 08.12.2009
Сообщений: 29
14.03.2010, 13:56  [ТС] 8
спасибо!) дошло до меня
1
марсель66
10.12.2010, 20:47 9
помогите покажалуйста...срочно нужно,
Даны: х,n массив t(n) вычислить произведение(П) от к=2 до n...(1+((-1)^k *х^2k /(k+1)!)-tk/(2k-3)!)
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.12.2010, 20:47
Помогаю со студенческими работами здесь

Найти факториал числа через рекурсивную процедуру
Program fatproc; var n:integer; s1:longint; procedure fact(x:integer;var s:longint); begin if...

Известен факториал числа n. Найти это число
Известен факториал числа n.Найти это число(факториал числа n равен 1*&quot;*...*n),напишите пожалуйста ...

Дан факториал натурального числа N. Найти само число.
Привет! Дан факториал натурального числа N. Найти само число. Например, если факториал 24, то N=4....

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


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

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

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