Cod sursa(job #2517432)

Utilizator MihneaGhiraMihnea MihneaGhira Data 3 ianuarie 2020 16:04:38
Problema Factoriale Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 1.19 kb
#include<fstream>
using namespace std;
ifstream fin("factoriale.in");
ofstream fout("factoriale.out");
int p,n,k;
int v[120],exponent[120],nr[100001],fr[160],prime[120];

void produs(int a[],int b){
    int r=0;
    for(int i=1;i<=a[0];i++){
        a[i]=a[i]*b+r;
        r=a[i]/10;
        a[i]%=10;
    }
    while(r!=0){
        a[0]++;
        a[a[0]]=r%10;
        r/=10;
    }
}

int exp(int x,int p){
    int r=p;
    int s=0;
    while(r<=x){
        s+=x/r;
        r*=p;
    }
    return s;
}


void ciur(){
    for(int i=2;i<=150;i++){
        if(fr[i]==0){
            prime[++p]=i;
            for(int j=i+i;j<=150;j+=i)
                fr[j]=1;
        }
    }
    return ;
}

int main(){
    fin>>n>>k;
    for(int i=1;i<=n;i++)
        fin>>v[i];
    ciur();
    for(int i=1;i<=n;i++)
        for(int j=1;j<=p;j++)
            exponent[j]+=exp(v[i],prime[j]);
    nr[0]=1;
    nr[1]=1;
    for(int i=1;i<=p;i++){
        if(exponent[i]==0)
            break;
        while(exponent[i]%k!=0){
            produs(nr,prime[i]);
            exponent[i]++;
        }
    }
    for(int i=nr[0];i>=1;i--)
        fout<<nr[i];
    return 0;
}