Cod sursa(job #2730877)

Utilizator answarIonascu Andrei answar Data 26 martie 2021 23:10:31
Problema Factoriale Scor 20
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,m;
long long f[10000];
ifstream cin("factoriale.in");
ofstream cout("factoriale.out");
int main () {
    cin>>n>>k;
    rez=1;
    x=1;
    for (i=1;i<=n;i++) {
        cin>>a;
        d=2;
        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<=100;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;
}