Pagini recente » Cod sursa (job #1927795) | Cod sursa (job #1318369) | Cod sursa (job #2686154) | Cod sursa (job #1638402) | Cod sursa (job #57107)
Cod sursa(job #57107)
#include<stdio.h>
int main()
{long x,n,i,j,r,d,p,k,fi,fj,fdif,sol=0;
FILE*f=fopen("pascal.in","r");
FILE*g=fopen("pascal.out","w");
fscanf(f,"%ld %ld",&r,&d);
fi=fj=fdif=1;
for(j=1;j<=r;j++)fi*=j;
//r!/(r-j)!*j!
for(j=1;j<=r;j++)
{
fdif=1;
for(i=1;i<=r-j;i++)
fdif*=i;
fj=1;
for(i=1;i<=j;i++) fj*=i;
x=fi/(fdif*fj);
if (x%d==0) sol++;
}
fprintf(g,"%ld",sol);
fclose(f);
fclose(g);
return 0;}