Вниз
Скачать: CL | DM;

Математики, вопрос для вас   Найти похожие ветки 

 
Vasya.ru ©   (2005-03-04 10:44) [0]

есть формула ((N + K - 1)! - N!) / K!, (0 < N, K < 1000000000). Собственно вопрос в том, как это можно рассчитать для разных наборов N, K, пользуясь только стандартными средствами TP, не используя длинную арифметику?


 
Думкин ©   (2005-03-04 10:49) [1]

N=999999999 K=2 И как не используя длинную?


 
TUser ©   (2005-03-04 11:02) [2]

По Стирлингу ее преобразовать, наверное


 
Alx2 ©   (2005-03-04 11:03) [3]

TUser ©   (04.03.05 11:02) [2]
Вот это очень мешает: (N + K - 1)! - N!


 
Alx2 ©   (2005-03-04 11:04) [4]

TUser ©   (04.03.05 11:02) [2]
Т.е. преобразовать-то можно, но для приемлемой точности аппроксимации на K и N лягут сильные ограничения


 
Думкин ©   (2005-03-04 11:05) [5]

> [2] TUser ©   (04.03.05 11:02)

В моем случае будет:

999999999!*999999999/2 как это согласовать со словами:

> пользуясь только стандартными средствами TP, не используя длинную арифметику?


?


 
MBo ©   (2005-03-04 11:07) [6]

в общем случае, конечно, в целых числах не выйдет.
Преобразуем так, чтобы не считать совсем уж офигенные
числа:
N!/K! * ((N+K-1)!/N! - 1)

для N>K

nk:=1;
for i:=k+1 to n do
 nk:=nk*i;

nk1:=1;
for i:=n+1 to n+k-1 do
 nk1:=nk1*i;

Result:=nk*(nk1-1);


 
Alex Konshin ©   (2005-03-04 11:23) [7]

a!/b! можно сократить.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.06 c
14-1109513422
GanibalLector
2005-02-27 17:10
2005.03.20
Толковый словарь (ОЧЕПЯТКИ)


1-1109860032
BALU1111
2005-03-03 17:27
2005.03.20
Что выбрать?


3-1108850653
beda
2005-02-20 01:04
2005.03.20
MS Access, Delphi, ADO - Unspecified error


4-1107427283
AlexTregubov
2005-02-03 13:41
2005.03.20
TWAIN


3-1108976389
BeginerEmpty
2005-02-21 11:59
2005.03.20
изменения значения IBX




   Наверх