Cod sursa(job #2765338)

Utilizator DordeDorde Matei Dorde Data 26 iulie 2021 14:53:56
Problema Pascal Scor 40
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.56 kb
#include <iostream>
#include <cstdio>
using namespace std;
int const N = 5e6 + 3;
int r , d , v [N];
int fn (int x){
    int ans = 0;
    for(int i = d ; i <= x ; i *= d)
        ans += x / i;
    return ans;
}
int main()
{
    freopen ("pascal.in" , "r" , stdin);
    freopen ("pascal.out" , "w" , stdout);
    scanf ("%d%d" , &r , &d);
    for(int i = 0 ; i <= r ; ++ i)
        v [i] = fn (i);
    int ans = 0;
    for(int i = 0 ; i <= r ; ++ i)
        if (v [r] > v [r - i] + v [i])
            ++ ans;
    printf ("%d" , ans);
    return 0;
}