Cod sursa(job #2033805)
| Utilizator | Data | 7 octombrie 2017 10:49:14 | |
|---|---|---|---|
| Problema | Pascal | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.41 kb |
#include <bits/stdc++.h>
using namespace std;
typedef unsigned long long ull;
ull exp(ull x,int p)
{
ull e=0, z=p;
while(x/p){e=e+x/p;
if(e>2) break;
p*=z;}
return e;
}
int main()
{
ifstream f("pascal.in");
ofstream g("pascal.out");
int r,d,p,div=0;;
f>>r>>d;
for(int i=0; i<=r; i++)
{
if((exp(r,d)-exp(r-i,d)-exp(i,d))>=1) div++;
}
g<<div;
return 0;
}
