Cod sursa(job #1191245)
| Utilizator | Data | 26 mai 2014 20:50:16 | |
|---|---|---|---|
| Problema | Pascal | Scor | 0 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.42 kb |
#include <fstream>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int r, d, sol;
int factorial(int n)
{
int f = 1;
for(int i=2; i<=n; i++)
{
f *= i;
}
return f;
}
int main()
{
fin >> r >> d;
int fact_R = factorial(r);
for(int i=1; i<=r-1; i++)
{
int deimp = fact_R / factorial(r-i) * factorial(i);
if(deimp % d == 0) sol++;
}
fout << sol << '\n';
fout.close();
return 0;
}
