Pagini recente » Cod sursa (job #861729) | Cod sursa (job #1254048) | Cod sursa (job #310645) | Cod sursa (job #1028265) | Cod sursa (job #980046)
Cod sursa(job #980046)
#include <iostream>
#include <fstream>
using namespace std;
ifstream in("pascal.in");
ofstream out("pascal.out");
unsigned long long r,k,x;
short d;
unsigned long long rec(long long x){
if (x==1) return 1;
else return x*rec(x-1);
}
int main()
{
in >> r >> d;
x=rec(r);
for (unsigned long long i=1; i<=r-1; i++)
if ((rec(i)/(x*rec(r-i)))%d==0) k++;
out << k;
return 0;
}