Cod sursa(job #581445)
| Utilizator | Data | 14 aprilie 2011 10:45:34 | |
|---|---|---|---|
| Problema | Pascal | Scor | 0 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.4 kb |
#include <fstream>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int d,k=0; double double r;
int Fact(int i)
{ int z=2,su=1;
while(z<=i)
{ su*=z; z++;}
return su;
}
int main()
{ fin>>r>>d;
for(int i=0;i<=r;i++)
// fout<<Fact(r)/(Fact(r-i)*Fact(i))<<" ";
if(Fact(r)/(Fact(r-i)*Fact(i))%d==0)
k++;
return 0;
}
