//Serene

#include<algorithm>

#include<iostream>

#include<cstring>

#include<cstdlib>

#include<cstdio>

#include<cmath>

using namespace std;

const int maxn=1000+10;

int n,cnt[30],len[maxn],ans[maxn],sum;

bool ok,vis[maxn];

string s[maxn];

int fir[maxn],to[maxn*maxn],nxt[maxn*maxn],e=0;

void add(int x,int y) {

    to[++e]=y;nxt[e]=fir[x];fir[x]=e;

}

void dfs(int pos) {

    if(ok) return;

    vis[pos]=1;ans[++sum]=pos;

    if(sum==n) {

        ok=1;return;

    }

    int x;

    for(int y=fir[pos];y;y=nxt[y]) {

        x=to[y];

        if(vis[x]) continue;

        dfs(x);

    }

    if(!ok) sum--,vis[pos]=0;

}

int main() {

    scanf("%d",&n);

    for(int i=1;i<=n;++i) cin>>s[i];

    sort(s+1,s+n+1);

    for(int i=1;i<=n;++i) {

        len[i]=s[i].size();

        cnt[s[i][0]-'a']++;

        cnt[s[i][len[i]-1]-'a']--;

    }

    int tot=0,pp;

    for(int i=0;i<26;++i) {

        if(cnt[i]==1) tot++,pp=i;

        if(cnt[i]==2) tot=2;

    }

    if(tot>=2) {

        printf("***");

        return 0;

    }

    for(int i=1;i<=n;++i) for(int j=n;j>=1;--j)

        if(i!=j&&s[i][len[i]-1]==s[j][0]) add(i,j);

    if(tot==1) {

        for(int i=1;i<=n;++i) if(s[i][0]-'a'==pp) dfs(i);

    }

    else for(int i=1;i<=n;++i) dfs(i);

    if(!ok) printf("***");

    else {

        cout<<s[ans[1]];

        for(int i=2;i<=n;++i) cout<<"."<<s[ans[i]];

    }

    return 0;

}