Pagini recente » Cod sursa (job #1465120) | Cod sursa (job #47718) | Cod sursa (job #2105957) | Cod sursa (job #1235148) | Cod sursa (job #443056)
Cod sursa(job #443056)
#include<fstream>
using namespace std;
int n,i,j,nr;
int b[100];
int d,r;
long fact(int m)
{
if(m==0||m==1)
return 1;
else
return m*fact(m-1);
}
int ndiv(int m)
{
long n=fact(m);
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;i++)
{
b[i]=ndiv(d)/(ndiv(i)*ndiv(d-i));
if(b[i]%r==0)
nr++;
}
g<<nr;
return 0;
}