#include <stdio.h>
#include <stdlib.h>

#define DUZINA 5

unsigned skracivanje(int imenilac,int **brojilac,int n,int *za_mnozenje);
int maksimalani_element(int **b,int n);
unsigned nzd(int a,int b); /*najveci zajednicki sadrzalac*/
unsigned skrati(int *a,int *b);

int main(){
    int imenilac = 0 ,i,n,k,j,m;
    unsigned long long rezultat=1;
    int **brojilac;
    int za_mnozenje[100];
    printf("Unesite broj clanova (ai):\n"); 
    scanf("%d",&n);
    brojilac=(int**)malloc(sizeof(int*)*n);
    if(brojilac==NULL)
                     exit(EXIT_FAILURE);
    for(i=0;i<n;i++){
                     m=0;
                     printf("Unesite a[%d]:",i);
                     scanf("%d",&j);
                     brojilac[i]=(int*)malloc(sizeof(int)*j);
                     if(brojilac[i]==NULL){
                                           printf("Greska pri alokaciji memomorije!\n");
                                           exit(EXIT_FAILURE);
                                           }
                     while(j>1){
                             brojilac[i][m++]=j;
                             j--;
                             }
                     brojilac[i][m]=-1;
                     imenilac+=brojilac[i][0];
                     }
    k=skracivanje(imenilac,brojilac,n,za_mnozenje);
    for(i=0;i<k;i++){
                     printf("%d *",za_mnozenje[i]);
                     rezultat*=za_mnozenje[i];
                  }
    printf("\n");
    printf("Trazeni broj je : %d \n",rezultat);  
    printf("\n");
    system("PAUSE");
    for(i=0;i<n;i++){
                     free(brojilac[i]);
                     }
    free(brojilac);
    free(za_mnozenje);
    return 0;
    }

int maksimalni_element(int **b,int n){
    int i,max=b[0][0];
    int p=0;
    for(i=1;i<n;i++){
                     if(max<b[i][0]){
                                     max=b[i][0];
                                     p=i;
                            }
                     }
    return p;
}        

unsigned nzd(int a,int b){
         if(b==0)
                 return a;
         return nzd(b,a%b);
         }
         
unsigned skrati(int *a,int *b){
         int p=nzd(*a,*b);
         *a=*a/p;
         *b=*b/p;
         }
         
unsigned skracivanje(int imenilac,int **brojilac,int n,int *za_mnozenje){
    int i,pom,m,tmp;
    unsigned k=0;
    i=maksimalni_element(brojilac,n);
    pom=brojilac[i][0];
    *brojilac[i]=*brojilac[n-1];
    n--;
    for(i=0;i<n;i++)
                    printf("Neskraceni %d ",brojilac[i][0]);
    printf("\n");
    for(;imenilac>pom;imenilac--){
                                  tmp=imenilac;
                                  for(i=0;i<n;i++){
                                                   for(m=0;brojilac[i][m]!=-1;m++){
                                                                               if(brojilac[i][m]==1)
                                                                                                   continue;
                                                                               if(tmp==1)
                                                                                              break;
                                                                               skrati(&tmp,&brojilac[i][m]);
                                                                               }
                                                   }
                                  if(tmp!=1) za_mnozenje[k++]=tmp;
                                  }
    return k;
}