Cod sursa(job #2961397)

Utilizator Pop_EmilPal Tamas Pop_Emil Data 6 ianuarie 2023 14:11:46
Problema Pascal Scor 40
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.55 kb
#include <iostream>
using namespace std;

FILE *in = fopen("pascal.in", "r"), *out = fopen("pascal.out", "w");
int R, D, res = 0;
int power;

int factor(int N, int D) {
    int pow = 0;
    while (N >= 1 && N % D == 0){
        N /= D;
        ++pow;
    }
    return pow;
}

int main()
{
    fscanf(in, "%d %d", &R, &D);

    power = 0;
    for (int j = 1; j <= R; ++j){
        power += factor(R - j + 1, D) - factor(j, D);
        if (power)
            ++res;
    }

    fprintf(out, "%d", res);
    fclose(in);
    fclose(out);
}