#include<fstream>
#include<string>

using namespace std;

ifstream fi("adn.in");
ofstream fo("adn.out");

string S[25];
int Poz[30005],M[25][25],L[25][25],Dp[(1<<18)+5][25];
pair<int,int> Prv[(1<<18)+5][25];

bool match(string &a, string &b, int &l)
{
    int n=a.size();
    int m=b.size();

    Poz[0]=-1;
    Poz[1]=0;
    for(int i=2; i<m; i++)
    {
        int p=Poz[i-1];
        while(p!=-1 && b[p+1]!=b[i])
            p=Poz[p];

        Poz[i]=p+1;
    }

    int poz=0;
    for(int i=1; i<n; i++)
    {
        while(poz!=-1 && b[poz+1]!=a[i])
            poz=Poz[poz];

        poz++;
        if(poz==m-1)
            return true;
    }
    l=poz;
    return false;
}

void rec(int conf, int poz)
{
    if(conf==0)
        return;

    rec(Prv[conf][poz].first,Prv[conf][poz].second);
    if(M[Prv[conf][poz].second][poz])
        return;
    for(int i=L[Prv[conf][poz].second][poz]+1; i<S[poz].size(); i++)
        fo<<S[poz][i];
}

int main()
{
    int n;
    fi>>n;
    for(int i=1; i<=n; i++)
    {
        fi>>S[i];
        S[i]=" "+S[i];
    }

    for(int i=1; i<=n; i++)
        for(int j=1; j<=n; j++)
            if(match(S[i],S[j],L[i][j]))
                M[i][j]=1;

    for(int i=0; i<(1<<n); i++)
        for(int j=0; j<n; j++)
            Dp[i][j]=1000000000;

    for(int i=0; i<n; i++)
        Dp[(1<<i)][i]=S[i+1].size()-1;

    for(int conf=1; conf<(1<<n); conf++)
    {
        for(int i=0; i<n; i++)
        {
            if(conf&(1<<i))
            {
                for(int j=0; j<n; j++)
                {
                    if(!(conf&(1<<j)))
                    {
                        if(M[i+1][j+1])
                        {
                            if(Dp[conf^(1<<j)][i]>Dp[conf][i])
                            {
                                Dp[conf^(1<<j)][i]=min(Dp[conf^(1<<j)][i],Dp[conf][i]);
                                Prv[conf^(1<<j)][i+1]={conf,i+1};
                            }
                        }
                        else
                        {
                            if(Dp[conf^(1<<j)][j]>Dp[conf][i]+S[j+1].size()-1-L[i+1][j+1])
                            {
                                Dp[conf^(1<<j)][j]=Dp[conf][i]+S[j+1].size()-1-L[i+1][j+1];
                                Prv[conf^(1<<j)][j+1]={conf,i+1};
                            }
                        }
                    }
                }
            }
        }
    }

    int rez=1000000000;
    int lst=0;
    for(int i=0; i<n; i++)
    {
        if(rez>Dp[(1<<n)-1][i])
        {
            rez=Dp[(1<<n)-1][i];
            lst=i+1;
        }
    }

    rec((1<<n)-1,lst);
    fo<<"\n";
    fi.close();
    fo.close();
    return 0;
}