Cod sursa(job #708059)
Utilizator | Data | 6 martie 2012 12:56:27 | |
---|---|---|---|
Problema | Pascal | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.36 kb |
#include "stdio.h"
long long k;
long long d;
long long i;
long long m=1;
long long nr=0;
int main()
{
freopen("pascal.in","r",stdin);
freopen("pascal.out","w",stdout);
scanf("%lld%lld",&k,&d);
for(i=1;i<k/2;i++)
{
m*=(k-i+1)/i;
if(m%d==0&&m>0)
nr+=2;
}
m*=(k-k/2+1)/(k/2);
if(m%d==0&&m>0)
nr+=1;
printf("%lld",nr);
return 0;
}