Life Forms 3294

#include<stdio.h>
#include<string.h>
#include<algorithm>
using namespace std;

const int maxn=200005;

//以下为倍增算法求后缀数组
int wa[maxn],wb[maxn],wv[maxn],Ws[maxn];
int cmp(int *r,int a,int b,int l)
{return r[a]==r[b]&&r[a+l]==r[b+l];}

void da(const int *r,int *sa,int n,int m){
	int i,j,p,*x=wa,*y=wb,*t; 
	for(i=0;i<m;i++) Ws[i]=0; 
	for(i=0;i<n;i++) Ws[x[i]=r[i]]++; 
	for(i=1;i<m;i++) Ws[i]+=Ws[i-1]; 
	for(i=n-1;i>=0;i--) sa[--Ws[x[i]]]=i; 
	for(j=1,p=1;p<n;j*=2,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<n;i++) wv[i]=x[y[i]]; //x[]->上次排序的排名
		for(i=0;i<m;i++) Ws[i]=0; 
		for(i=0;i<n;i++) Ws[wv[i]]++; 
		for(i=1;i<m;i++) Ws[i]+=Ws[i-1]; 
		for(i=n-1;i>=0;i--) sa[--Ws[wv[i]]]=y[i]; 
		//y[i]->二级排序后第i大的下标，循环从n-1到0由于一级排序相同要看二级排序
		for(t=x,x=y,y=t,p=1,x[sa[0]]=0,i=1;i<n;i++) 
			x[sa[i]]=cmp(y,sa[i-1],sa[i],j)?p-1:p++; 
	} 
	return; 
}
int sa[maxn],Rank[maxn],height[maxn];
//求height数组
//sa[1,n]取值范围[0,n-1],sa[0]为特殊字符
//Rank[0,n-1]取值范围[1,n]
//height[1,n]表示排名相邻的两个后缀的最长公共前缀
//height[i]表示sa[i]和sa[i-1]的最长前缀 排名为i与i-1的最长公共前缀
void calheight(const int *r,int *sa,int n){
	int i,j,k=0;
	for(i=1;i<=n;i++) Rank[sa[i]]=i;
	for(i=0;i<n;height[Rank[i++]]=k)
		for(k?k--:0,j=sa[Rank[i]-1];r[i+k]==r[j+k];k++);
	return;
}
/*
da(r,sa,n+1,128);
n+1表示加入特殊字符后的长度[0,n];
calheight(r,sa,n);
去掉特殊字符[1,n]长度，就是输入字符串长度n
*/


char b[maxn];
char ans[maxn];
int a[maxn];
int len[maxn];
int tot;
int lt;
int vis[105];
int limit;

int group(int x){
	int i;
	for(i=0;i<tot;i++)
		if(len[i]>x)
			return i;
	return i;
}

int Gao(int L){
	int sum=0;
	for(int i=1;i<=lt;i++){
		if(height[i]<L){
			sum=0;
			memset(vis,0,sizeof(vis));
		}else{
			if(!vis[group(sa[i-1])])sum++;
				vis[group(sa[i-1])]=1;
			if(!vis[group(sa[i])])sum++;
				vis[group(sa[i])]=1;
			if(sum>=limit)return 1;
		}
	}
	return 0;
}

int Bin(){
	int i,j,k;
	int l=1,r=1000;
	int ret=0;
	while(l<=r){
		int mid=(l+r)>>1;
		if(Gao(mid)){
			l=mid+1;
			ret=mid;
		}else{
			r=mid-1;
		}
	}
	return ret;
}


void Kao(int L){
	int sum=0;
	int flag=0;
	for(int i=1;i<=lt;i++){
		if(height[i]<L){
			sum=0;
			flag=0;
			memset(vis,0,sizeof(vis));
		}else{
			if(!vis[group(sa[i-1])])sum++;
				vis[group(sa[i-1])]=1;
			if(!vis[group(sa[i])])sum++;
				vis[group(sa[i])]=1;
			if(sum>=limit && !flag){
				for(int j=sa[i];j<sa[i]+L;j++)
						printf("%c",ans[j]);
				puts("");
				flag=1;
			};
		}
	}
}

int main(){
	int max;
	int n,m;
	int i,j,k;
	int mark=0;
	while(scanf("%d",&tot)!=EOF && tot){
		if(mark==1)puts("");
		mark=1;
		if(tot==1){
			scanf("%s",b);
			puts(b);
			continue;
		}
		limit=tot/2+1;
		max=200;
		lt=0;
		for(i=0,k=0;i<tot;i++){
			scanf("%s",b);
			len[i]=strlen(b);
			for(j=0;j<len[i];j++,k++){
				a[k]=b[j]-'a'+1;
				ans[k]=b[j];
			}
			a[k++]=max++;
			len[i]=k;
		}	
		a[k-1]=0;
		lt=k-1;
		da(a,sa,k,max+100);
		calheight(a,sa,k-1);
		int L=Bin();
		if(L<=0)puts("?");
		else Kao(L);
	}
	return 0;
}