Cod sursa(job #2738104)

Utilizator BlueLuca888Girbovan Robert Luca BlueLuca888 Data 5 aprilie 2021 14:31:03
Problema Factoriale Scor 40
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.85 kb
#include <iostream>
#include <fstream>

using namespace std;

ifstream fin  ("factoriale.in");
ofstream fout ("factoriale.out");

long long f[105];
long long n, k;
long long x, y;
long long sol=1;

int main (){
    fin>>n>>k;
    for(long long i=1; i<=n; i++){
        fin>>x;
        for(long long j=2; j<=x; j++){
            y=j;
            while(y%2 == 0){
                f[2]++;
                y/=2;
            }

            for(long long d=3; d<=y/d; d+=2)
                while(y%d == 0){
                    f[d]++;
                    y/=d;
                }
            if(y != 1)
                f[y]++;
        }
    }


    for(long long i=2; i<=100; i++)
        if(f[i] != 0)
            while(f[i]%k != 0){
                f[i]++;
                sol *= i;
            }

    fout<<sol;
    return 0;
}