Cod sursa(job #2728587)

Utilizator biancalautaruBianca Lautaru biancalautaru Data 23 martie 2021 14:15:35
Problema Factoriale Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.94 kb
#include <fstream>
using namespace std;
ifstream fin("factoriale.in");
ofstream fout("factoriale.out");
int n,k,i,j,x,y,d,f[98],f1[1000001];
bool ok;
int main() {
    fin>>n>>k;
    for (i=1;i<=n;i++) {
        fin>>x;
        for (j=2;j<=x;j++) {
            y=j;
            for (d=2;y!=1 && d*d<=y;d++)
                while (y%d==0) {
                    f[d]++;
                    y/=d;
                }
            if (y!=1)
                f[y]++;
        }
    }
    for (j=1;;j++) {
        for (i=2;i<=97;i++)
            f1[i]=0;
        x=j;
        for (i=2;x!=1 && i*i<=x;i++)
            while (x%i==0) {
                f1[i]++;
                x/=i;
            }
        if (x!=1)
            f1[x]++;
        ok=1;
        for (int i=2;i<=97;i++)
            if ((f[i]+f1[i])%k!=0)
                ok=0;
        if (ok==1) {
            fout<<j;
            return 0;
        }
    }
    return 0;
}