Cod sursa(job #2156657)
Utilizator | Data | 8 martie 2018 21:46:04 | |
---|---|---|---|
Problema | Pascal | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.36 kb |
#include<fstream>
using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int n,d,sol,i,k;
unsigned long long comb[5000001];
int main()
{
f>>n>>d;
comb[0]=1;
comb[1]=n;
if(n%d==0)
sol++;
for(i=2;i<=n;i++)
{
comb[i]=((n+i-1)*comb[i-1]/i);
if(comb[i]%d==0)
sol++;
}
g<<sol;
}