Cod sursa(job #3313356)
| Utilizator | Data | 3 octombrie 2025 19:11:06 | |
|---|---|---|---|
| Problema | Pascal | Scor | 10 |
| Compilator | cpp-64 | Status | done |
| Runda | Arhiva de probleme | Marime | 0.57 kb |
#include <fstream>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
int fac[5000000 + 5], r, d;
int nr_fac(int x )
{
int cnt = 0;
while ( x )
{
++cnt;
x /= d;
}
return cnt;
}
int main()
{
int i;
fin >> r >> d;
for ( i = d; i <= r; ++i )
fac[i] = fac[i - 1] + nr_fac(i);
int sol = 0;
for ( i = 1; i <= r; ++i )
{
int nr_d = fac[r] - fac[r - i] - fac[i];
if ( nr_d )
++sol;
}
fout << sol << '\n';
return 0;
}
