Cod sursa(job #2983488)

Utilizator Robert_MitriRobert Mitri Robert_Mitri Data 22 februarie 2023 15:50:04
Problema Factoriale Scor 10
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.9 kb
#include <fstream>
using namespace std;
ifstream fin("factoriale.in");
ofstream fout("factoriale.out");

int n,k;

int x;

int f[105];


int main()
{
    fin>>n>>k;
    for(int i=1; i<=n; i++)
    {
        int q;
        fin>>q;
        for(int l=2; l<=q;l++)
        {
            x=l;
            for(int d=2; d*d<=x; d++)
            {
                while(x%d==0)
                {
                    f[d]++;
                    x/=d;
                }
            }
            if(x!=1)
                f[x]++;
        }

    }
    long long  sol=1;
    for(int i=2; i<=100; i++)
    {
        if(f[i])
        {
            if(f[i]%k!=0)
            {
                int nr = 1;
                for(int j=1;j<=f[i]%k;j++)
                {
                    nr*=i;
                }
                sol*=1LL*i;
            }
        }
    }
    fout<<sol;
}