1856: [Scoi2010]字符串

时间:2021-03-24 14:41:38

1856: [Scoi2010]字符串

Time Limit: 5 Sec  Memory Limit: 64 MB
Submit: 847  Solved: 434
[Submit][Status]

Description

lxhgww最近接到了一个生成字符串的任务,任务需要他把n个1和m个0组成字符串,但是任务还要求在组成的字符串中,在任意的前k个字符中,1的个数不能少于0的个数。现在lxhgww想要知道满足要求的字符串共有多少个,聪明的程序员们,你们能帮助他吗?

Input

输入数据是一行,包括2个数字n和m

Output

输出数据是一行,包括1个数字,表示满足要求的字符串数目,这个数可能会很大,只需输出这个数除以20100403的余数

Sample Input

2 2

Sample Output

2

HINT

【数据范围】
对于30%的数据,保证1<=m<=n<=1000
对于100%的数据,保证1<=m<=n<=1000000

Source

Day2

题解:这个题不难想——首先就是这种类似找钱问题的模型,便可以转化为一个方格然后走路的模型(类似于杨辉三角,传送门,这个链接里面有详细的讲解,再次不再赘述,此题Ans=C(m+n,n)-C(m+n,n+1))。。。紧接着——常年不写逆元的我(HansBug:首先连公式都快忘了 Phile:呵呵,不就是(a/b) mod p=(a*ksm(b,p-2)) mod p,其中p为质数,ksm(a,b)表示求a的b次幂,一般用快速幂写)又开始了逗比事业——先是先乘完了分母,然后再一个个的来逆元求商,呵呵呵呵。。。果断TLE,然后可爱的我才意识到貌似可以把分母乘起来再逆元,然后没有然后了(Phile:你为啥总是那么充满喜剧色彩= =  HansBug:唉。。要不谈何萌妹哪。。。)

 const p=;
var
m,n:longint;
i,j:int64;
function ksm(x,y:longint):int64;inline;
var
z,i:int64;
begin
x:=x mod p;
z:=;
i:=x;
while y> do
begin
if odd(y) then z:=(z*i) mod p;
i:=(i*i) mod p;
y:=y div ;
end;
ksm:=z;
end;
function cc(x,y:longint):int64;inline;
var
i:longint;z,z2:int64;
begin
z:=;
if y>(x div ) then y:=x-y;
i:=x;
while i>=(y+) do
begin
z:=(z*i) mod p;
dec(i);
end;
i:=x-y;z2:=;
while i>= do
begin
z2:=(z2*i) mod p;
dec(i);
end;
cc:=(z*ksm(z2,p-)) mod p;
end;
begin
readln(n,m);
i:=cc(n+m,n);j:=i;
i:=(i*m) mod p;
i:=(i*ksm(n+,p-)) mod p;
writeln((j-i+p) mod p);
end.