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

#define MaxKlad 1024
#define MaxDelka 0x7fffffff

struct TPrvek {
    int dvojice,prvni,druha;
};

int Klady[MaxKlad], n;
struct TPrvek Halda[MaxKlad];

int compare(const void *a,const void *b)  // Porovnávací fce pro {\I qsort}
{
   return *(int *)a-*(int *)b;
}

void Zatrid(int co,int velikost)         // Najde prvku ve vrcholu {\I co}
{                                        // správnou pozici v~haldě
   struct TPrvek x=Halda[co];            // o~velikosti {\I velikost}
   int i=2*co,j=co;

   while (i<velikost)
   {
      if ((i+1<velikost)&&(Halda[i].dvojice>Halda[i+1].dvojice)) i++;
      if (x.dvojice<=Halda[i].dvojice) break;
      Halda[j]=Halda[i];j=i;i=2*j;
   }
   Halda[j]=x;
}

int main()
{
   int i,posledni,carka;

   scanf("%d",&n);                         // Načte počet klád do $n$
   for(i=0;i<n;i++) scanf("%d",&Klady[i]);  // a délky klád
   qsort(Klady,n,sizeof(int),compare);     // a setřídí je dle délky

   for(i=0;i<n-1;i++)                         //Vytvoří haldu
     {
        Halda[i].dvojice=Klady[i]+Klady[i+1];
        Halda[i].prvni=Klady[i];
        Halda[i].druha=i+1;
     }
   Halda[n-1].dvojice=MaxDelka;           //Poslední kláda už dvojici netvoří
   posledni=-1;carka=0;

   while (Halda[0].dvojice<MaxDelka)     //Dokud nenarazíme na~fiktivní kládu
     {
         if (posledni<Halda[0].dvojice)        //Výpis pouze pro nové hodnoty
            if (!carka) {printf("%d",Halda[0].dvojice);carka=1;}
                else printf(",%d",Halda[0].dvojice);
         posledni=Halda[0].dvojice;

         if (++Halda[0].druha==n)             //Náhrada novou dvojicí klád
            Halda[0].dvojice=MaxDelka;        //Pokud není, fiktivní hodnotou
         else
            Halda[0].dvojice=Halda[0].prvni+Klady[Halda[0].druha];
         Zatrid(0,n);                         //Zatřídění vrcholu do haldy
     }
   putchar('\n');
   return 0;
}