★★★100分：彩票35选7有多少种组合？（1到35中选7个，不能有重复！）

[UC80862056]

求组合的公式：C(m,n)=n!/(m!*(n-m)!)
我发现20（也可能是19，具体我忘了）以内的可以算出正确的值，但是大了就不行了（可能是因为超出长整数的范围了）。怎么办？
请给出能算任意大数的组合数的算法。不会也请帮忙顶一下。
（求阶乘我用的是第归的方法）

[postren]

N的阶乘参考
http://community.csdn.net/Expert/topic/3466/3466784.xml?temp=.6937525

[ygflydream]

up!

[僵哥]

从m个数当中先n个数做不重复排列的计算是否就是
m和n都为大于1的自然数
m>=n

C(m,n)=[m-(n-1)]+..+1
C(35,7)=29+28+27+26+25+24+23+22+21+20+19+18+17+16+15+14+13+12+11+10+9+8+7+6+5+4+3+2+1=435

[ironwill2004]

procedure TForm1.Button1Click(Sender: TObject);
var z,j:integer;
begin
i:=1;
for j:=1 to 7 do
begin
z:=36-j;
i:=i*z/j
end;
showmessage(floattostr(i));
end;
应该是这个数字，6724520

[ironwill2004]

其实也就是35乘到35-7+6，再除以（7...1)
i为real类型

[hellolongbin]

我当时路上没事，心算了一下，好像才几百万的说
C(35,7) 然后减去7位连号、6位连号、5位连号甚至4位连号的组合（注意7位连号中包含6位连号，同样6位连号中也包含5位、4位连号）
我当时心算的是280多万吧，后来一直没验证

[hellolongbin]

35！＝1.0333147966386144929666651337523e+40
28！＝304888344611713860501504000000
7！＝5040
C(35,7)=35!/(7!*28!)=6724520
晕，原来跟我算的差这么多
这是全部的，没有去掉我上面说的条件的

[老本]

var
iCong, iXuan: Integer;
iResult: integer;//int64;
i: integer;
begin
iResult := 1;
iCong := StrToInt(Edit1.Text); //从
iXuan := StrToInt(Edit2.Text); //选
for i := 1 to iXuan do
begin
iResult := iResult*(iCong-i+1) div i;
end;
Edit3.Text := IntToStr(iResult);
end;


计算结果：6724520。
采用Integer也不会溢出。
采用公式：结果 = 35 * 34 * 33 * 32 * 31 * 30 * 29 / 7 / 6 / 5 / 4 / 3 / 2 / 1

[kuki84]

以前用pascal写的代码找不着了。
算法是：结果用数组来表示，每一位用数组的一个元素来表示，例如预计结果是
1000位，那个数组也设置个1000个元素左右的。然后乘数被乘数也用数组，用小学
竖式的思路，一位一位算。

[liangkove]

朋友，用组合排列算一下啦。
结果是：35*34*33*32*31*30*29/(7!)

[UC80862056]

上面的公式是怎么推导出来的。好像学过，但是忘了。

[UC80862056]

也就是说：C(m,n)=n!/(m!*(n-m)!)还能用什么公式表示？

[hellolongbin]

C(m,n)=m*(m-1)*(m-2)*..*(m-n+1)/n!

[UC80862056]

我问的是:采用公式：结果 = 35 * 34 * 33 * 32 * 31 * 30 * 29 / 7 / 6 / 5 / 4 / 3 / 2 / 1
用的是什么公式?

[fsybaby]

结果 = 35 * 34 * 33 * 32 * 31 * 30 * 29 / 7 / 6 / 5 / 4 / 3 / 2 / 1
这个公式就是C(m,n)=n!/(m!*(n-m)!)的变形，这个你不用担心

[Kshape]

35！＝6399018521010896896，不知道结果对不对？！
==============================================
好象不对

[Kshape]

35 * 34 * 33 * 32 * 31 * 30 * 29

为什么要除/ 7 / 6 / 5 / 4 / 3 / 2 / 1呢？

[hthunter]

呵呵，彩民……

[UC80862056]

up

[jellypillar]

因C(m,n)=n!/(m!*(n-m)!)

所以

C(35,7)=35!/(7!*28!)=35!/28!/7!

其中35!/28!=35*34*33*……*29。

所以答案就是35 * 34 * 33 * 32 * 31 * 30 * 29 / 7 / 6 / 5 / 4 / 3 / 2 / 1


？有那么难理解吗？