#include<iostream>

#include<stdio.h>

#include<string.h>

#include<stdlib.h>

#include<string>

#include<map>

#define LL long long

using namespace std;

#define maxn 1110000

int max(int x,int y)

{return x>y?x:y;}

int min(int x,int y)

{return x<y?x:y;}

int wa[maxn],wb[maxn],wv[maxn],WS[maxn];

int vex[maxn],size,vis[],pre[maxn],cou;//vex存每一段的长度 size表示个数 pre存满足条件的开始位置 cou存满足的个数

int cmp(int *r,int a,int b,int l)

{return r[a]==r[b]&&r[a+l]==r[b+l];}

void da(int *r,int *sa,int n,int m)

{

    int i,j,p,*x=wa,*y=wb,*t;

    for(i=;i<m;i++) WS[i]=;

    for(i=;i<n;i++) WS[x[i]=r[i]]++;

    for(i=;i<m;i++) WS[i]+=WS[i-];

    for(i=n-;i>=;i--) sa[--WS[x[i]]]=i;

    for(j=,p=;p<n;j*=,m=p)

    {

        for(p=,i=n-j;i<n;i++) y[p++]=i;

        for(i=;i<n;i++) if(sa[i]>=j) y[p++]=sa[i]-j;

        for(i=;i<n;i++) wv[i]=x[y[i]];

        for(i=;i<m;i++) WS[i]=;

        for(i=;i<n;i++) WS[wv[i]]++;

        for(i=;i<m;i++) WS[i]+=WS[i-];

        for(i=n-;i>=;i--) sa[--WS[wv[i]]]=y[i];

        for(t=x,x=y,y=t,p=,x[sa[]]=,i=;i<n;i++)

            x[sa[i]]=cmp(y,sa[i-],sa[i],j)?p-:p++;

    }

    return;

}

int Rank[maxn],height[maxn];

void calheight(int *r,int *sa,int n)

{

    int i,j,k=;

    for(i=;i<=n;i++) Rank[sa[i]]=i;

    for(i=;i<n;height[Rank[i++]]=k)

        for(k?k--:,j=sa[Rank[i]-];r[i+k]==r[j+k];k++);

    return;

}

int r[maxn],sa[maxn];

int ok(int x,int n,int k)

{

    cou=;

    int i,j,ret=;

    memset(vis,,sizeof(vis));

    for(i=;i<=n;i++)

    {

        if(height[i]>=x)

        {

            for(j=;j<size;j++)

            {

                if(sa[i]>vex[j-]&&sa[i]<vex[j])//由于自己添加的并不会相同 所以只要满足在中间位置就可以

                {

                    if(!vis[j])//如果满足就标记掉那个位置

                    {

                        vis[j]=;

                        ret++;

                    }

                }

                if(sa[i-]>vex[j-]&&sa[i-]<vex[j])

                {

                    if(!vis[j])

                    {

                        vis[j]=;

                        ret++;

                    }

                }

            }

        }

        else

        {

            if(ret>k)

            {

                pre[cou++]=sa[i-];

            }

            ret=;

            memset(vis,,sizeof(vis));

        }

    }

    if(ret>k)

    {

        pre[cou++]=sa[n];

    }

    if(cou>)//表面有满足条件的

        return ;

    return ;

}

char s[maxn],c[maxn];

int main()

{

    int i,n,ff=,fl;

    while(cin>>n)

    {

        if(!n)break;

        size=;

        int len=;

        int num=;

        for(i=;i<n;i++)

        {

            scanf("%s",c);

            int fl=strlen(c);

            for(int p=;p<fl;p++)

            {

                r[len]=c[p];//修改了此处 过了 之前是先存在s[]中 但是会出现问题 因为100多可能字符有问题

                s[len++]=c[p];

            }

            vex[size++]=len;

            r[len]=num;

            s[len++]=num++;

        }

        len--;

        int j=len;

        r[j]=;

        da(r,sa,j+,);

        calheight(r,sa,j);

        int left,right,mid,ans=-;

        left=,right=j,cou=;

        while(left<=right)

        {

            mid=(left+right)/;

            if(ok(mid,j,n/))

            {

                fl=cou;

                ans=mid;

                left=mid+;

            }

            else right=mid-;

        }

        /*for(i=1;i<=j;i++)

        printf("%d ",height[i]);

        printf("\n");*/

        if(ff)

            printf("\n");

        else ff=;

        if(ans<=)

        {

            printf("?\n");

            continue;

        }

        //printf("%d\n",ans);

        for(i=;i<fl;i++)

        {

            for(j=;j<ans;j++)

            {

                printf("%c",s[pre[i]+j]);

            }

            printf("\n");

        }

    }

}

/*

5

abcdef

bcdea

hzbcde

bcdyz

acxq

*/