Cod sursa(job #2215259)

Utilizator alextodoranTodoran Alexandru Raul alextodoran Data 21 iunie 2018 14:57:06
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.99 kb
#include <bits/stdc++.h>

using namespace std;

int r, m, lgr;
int k;

int legp(int p, int a)
{
    int rez = 0, p1 = p;
    for(int i = 1; a / p1; i++, p1 *= p)
        rez += a / p1;
    return rez;
}

int main()
{
    ifstream fin ("pascal.in");
    ofstream fout ("pascal.out");
    fin >> r >> m;
    for(int i = 0; i <= r; i++)
    {
        int mi = -1;
        int m1 = m, x = 2;
        while(m1 > 1)
        {
            if(x * x > m1)
                x = m1;
            int e = 0;
            while(m1 % x == 0)
            {
                m1 /= x;
                e++;
            }
            if(e > 0)
            {
                int lg1, lg2;
                lg1 = legp(x, r) / e;
                lg2 = (legp(x, i) + legp(x, r - i)) / e;
                if(lg1 - lg2 < mi || mi == -1)
                    mi = lg1 - lg2;
            }
            x++;
        }
        if(mi != 0)
            k++;
    }
    fout << k << "\n";
    return 0;
}