Cod sursa(job #2520231)

Utilizator divianegoescuDivia Negoescu divianegoescu Data 9 ianuarie 2020 11:26:14
Problema Factoriale Scor 100
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 pr[]={25,2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97};
int n,k,i,j,x,e[102],sol[100002];
int exponent(int x,int p){
    int s=0,P=p;
    while(x/P){
        s+=x/P;
        P*=p;
    } return s;
}
void inmulteste(int a[],int b){
    int t=0;
    for(int i=1;i<=a[0];i++){
        a[i]=a[i]*b+t;
        t=a[i]/10;
        a[i]%=10;
    }
    for(;t;t/=10)
        a[++a[0]]=t%10;
}
int main(){
    fin>>n>>k;
    for(i=1;i<=n;i++){
        fin>>x;
        for(j=1;j<=25;j++)
            e[j]+=exponent(x,pr[j]);
    }
    sol[0]=sol[1]=1;
    for(i=1;i<=25;i++){
        if(e[i]==0)break;
        while(e[i]%k){
            inmulteste(sol,pr[i]);
            e[i]++;
        }
    }
    for(i=sol[0];i>=1;i--)
        fout<<sol[i];
    return 0;
}