Pagini recente » Cod sursa (job #608957) | Cod sursa (job #302538) | Cod sursa (job #117660) | Cod sursa (job #2015960) | Cod sursa (job #632440)
Cod sursa(job #632440)
#include<fstream>
using namespace std;
int n,i,j,nr;
int a[100];
int d,r;
long fact(int x)
{
if(x==0||x==1)
return 1;
else
return x*fact(x-1);
}
int ndiv(int x)
{
long n=fact(x);
int fm,i=2;
int nr=1;
do
{
fm=0;
while(n%i==0)
{
fm++;
n=n/i;
nr=nr*(fm+1);
}
i++;
}while(n!=1);
return nr;
}
int main()
{
ifstream f("pascal.in");
ofstream g("pascal.out");
f>>d>>r;
for(i=1;i<=d/2+1;i++)
{
a[i]=ndiv(d/2)/(ndiv(i)*(ndiv(d-i)));
if(a[i]%r==0)
nr++;
}
g<<nr;
return 0;
}