Pagini recente » Cod sursa (job #446702) | Cod sursa (job #3130072) | Cod sursa (job #4388) | Cod sursa (job #1356303) | Cod sursa (job #10621)
Cod sursa(job #10621)
#include<iostream.h>
#include<fstream.h>
main()
{
unsigned long i,j,n,m;
long long s,s2,s3,d,k,delta,ij;
fstream f("pascal.in",ios::in);
fstream g("pascal.out",ios::out);
f>>i;
f>>d;
j=0;
delta=0;
do{
k=1;s=1;
ij=i-j;
do{
s*=k;
k++;
}while(k<=i);
k=1;s2=1;
do{
s2*=k;
k++;
}while(k<=ij);
k=1;s3=1;
do{
s3*=k;
k++;
}while(k<=j);
s2*=s3;
s/=s2;
if(s%d==0)delta++;
j++;
}while(j<=i);
g<<delta;
return 0;
}