slzxfyc 2008-07-20 03:16:00
点我顶贴
收藏
删除
C(n,m)=m!/(n!*(m-n)!)
当m!中的2的约数为s1,n!中的2的约数为s2,(m-n)!中的2的约数为s3,当s1=s2+s3时即为奇数，反之为偶数
附上主要程序：
for i:=1 to n do
begin
s:=a[i]；t:=b[i]；
v1:=t；k1:=0；
v2:=s-t；k2:=0；
v3:=s；k3:=0；
while v1>0 do
begin
k1:=k1+v1 div 2；
v1:=v1 div 2；
end；
while v2>0 do
begin
k2:=k2+v2 div 2；
v2:=v2 div 2；
end；
while v3>0 do
begin
k3:=k3+v3 div 2；
v3:=v3 div 2；
end；
k1:=k1+k2；
if k1=k3 then writeln(1) else writeln(0)；
end；