Cod sursa(job #2593412)

Utilizator FrostfireMagirescu Tudor Frostfire Data 3 aprilie 2020 20:12:05
Problema Pascal Scor 40
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <iostream>
#include <fstream>
#define NMAX 5000000

using namespace std;

ifstream f("pascal.in");
ofstream g("pascal.out");

int n, p, ans, nr[NMAX+10];

void precalc()
{   for(int d=p; d<=n; d*=p)
        for(int i=d; i<=n; i+=d) nr[i]++;
}

int main()
{
    f >> n >> p;
    precalc();
    int val = 0, st = 1, dr = n;
    for(int i=1; i<=n; i++)
        {   val = val + nr[dr] - nr[st];
            st++;
            dr--;
            if(val) ans++;
        }
    g << ans << '\n';
    return 0;
}