Cod sursa(job #2730860)

Utilizator answarIonascu Andrei answar Data 26 martie 2021 22:51:28
Problema Factoriale Scor 30
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.89 kb
#include <fstream>
#include <algorithm>
using namespace std;
long long n,k,rez,c,p,j,a,x,i,d,exp;
long long f[10000];
ifstream cin("factoriale.in");
ofstream cout("factoriale.out");
int main () {
    cin>>n>>k;
    rez=1;
    for (i=1;i<=n;i++) {
        cin>>a;
        d=2;
        x=1;
        for (j=1;j<=a;j++) {
            x*=j;
        }
        while (x>1) {
            while (x%d==0) {
                f[d]++;
                x/=d;
            }
            d++;
            if (x>1&&d*d>x) {
                d=x;
            }
        }
    }
        for (i=2;i<=97;i++) {
            if (f[i]>0) {
                if (f[i]%k!=0) {
                    exp=k-f[i]%k;
                }
                p=1;
                for (j=1;j<=exp;j++) {
                    p*=i;
                }
                rez*=p;
            }
        }
    cout<<rez;
}