Cod sursa(job #275084)
| Utilizator |  Ilinca George Mihai 630r63 |
Data | 10 martie 2009 10:44:32 |
|---|---|---|---|
| Problema | Pascal | Scor | 20 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.34 kb |
#include<fstream>
using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int factorial(int m)
{
int i,p=1;
for(i=1;i<=m;i++) p*=i;
return p;
}
int main()
{
long r;
int d,c=0,i;
f>>r>>d;
for(i=0;i<=r;i++) if(!(factorial(r)/(factorial(r-i)*factorial(i))%d)) c++;
g<<c;
f.close();
g.close();
return 0;
}