Cod sursa(job #1132898)
| Utilizator | Data | 4 martie 2014 00:30:01 | |
|---|---|---|---|
| Problema | Pascal | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.59 kb |
#include<fstream>
using std::ifstream;
using std::ofstream;
long fact(long nr)
{
long i,f;
if(nr==0 || nr==1)
return 1;
f=1;
for(i=2;i<=nr;i++)
f*=i;
return f;
}
int main()
{
int D,nr=0;
long R;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
fin>>R>>D;
for(long i=0;i<=R/2;i++)
if(!((fact(R)/(fact(R-i)*fact(i)))%D))
nr++;
if(!(nr%2))
fout<<nr*2-1;
else
fout<<nr*2;
fin.close();
fout.close();
return 0;
}
