Cod sursa(job #2218196)
Utilizator | Data | 3 iulie 2018 17:22:03 | |
---|---|---|---|
Problema | Pascal | Scor | 20 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.4 kb |
#include <iostream>
#include <fstream>
using namespace std;
int fact(int x){
int i,z=1;
for (i=1;i<=x;++i)
z*=i;
return z;
}
int main()
{
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int i,j=0,r,d,f;
fin >> r >> d;
for (i=0;i<=r;++i){
if (i<r)
if (fact(r) /( fact(r-i) * fact(i))%d == 0 ) ++ j;
};
fout << j;
return 0;
}