#include <cstdio>
#include <cstring>
#include <iostream>
using namespace std;
const int maxn=60010;
int n,m,tot;
int sa[maxn],r[maxn],rank[maxn],ra[maxn],rb[maxn],st[maxn];
char str[5];
void work()
{
    int i,j,p,*x=ra,*y=rb;
    for(i=0;i<n;i++)    st[x[i]=r[i]]++;
    for(i=1;i<m;i++)    st[i]+=st[i-1];
    for(i=n-1;i>=0;i--)    sa[--st[x[i]]]=i;
    for(j=p=1;p<n;j<<=1,m=p)
    {
        for(p=0,i=n-j;i<n;i++)    y[p++]=i;
        for(i=0;i<n;i++)    if(sa[i]>=j)    y[p++]=sa[i]-j;
        for(i=0;i<m;i++)    st[i]=0;
        for(i=0;i<n;i++)    st[x[y[i]]]++;
        for(i=1;i<m;i++)    st[i]+=st[i-1];
        for(i=n-1;i>=0;i--)    sa[--st[x[y[i]]]]=y[i];
        for(swap(x,y),p=i=1,x[sa[0]]=0;i<n;i++)
            x[sa[i]]=(y[sa[i-1]]==y[sa[i]]&&y[sa[i-1]+j]==y[sa[i]+j])?p-1:p++;
    }
    for(i=1;i<n;i++)    rank[sa[i]]=i;
}
int main()
{
    int i;
    scanf("%d",&n);
    for(i=0;i<n;i++)
    {
        scanf("%s",str);
        r[i]=r[2*n-i-1]=str[0]-‘A‘+1;
        m=max(m,r[i]+1);
    }
    n=n*2+1;
    work();
    int L=0,R=n>>1;
    while(L+R<n-1)
    {
        if(rank[L]<rank[R])    printf("%c",r[L++]+‘A‘-1);
        else    printf("%c",r[R++]+‘A‘-1);
        if(++tot==80)
        {
            tot=0;
            printf("\n");
        }
    }
    return 0;
}