#include <stdio.h>
#define D 26

int h4[D][D][D][D], h3[D][D][D], h2[D][D];

char w[800][5];
int z[4],n;
int tagen[800];

void MLX(int nr){ //Detta ar den rekursiva funktionen, nr ar vilken rad vi haller pa med (forsta ar 0)
  int p,q;
  if(nr==4){  //fardigfyllt, skriv ut!
    for(p=0;p<4;p++) printf("%s\n", w[z[p]]);
    printf("\n");
    return;
  }
  for(z[nr]=0;z[nr]<n;z[nr]++) if(!tagen[z[nr]]){
    tagen[z[nr]]=1;   //Vi valjer ord nummer z[nr] pa den aktuella raden.
    for(p=0;p<4;p++){ 

      // For varje kolumn, kolla om de bildade lodrata bokstavssekvenserna ar borjan
      //  av riktiga ord, som dessutom inte redan ar tagna som vagrata ord.
      if((nr==1 && !h2[w[z[0]][p]-'A'][w[z[1]][p]-'A']) ||
	 (nr==2 && !h3[w[z[0]][p]-'A'][w[z[1]][p]-'A'][w[z[2]][p]-'A']) ||
	 (nr==3 && (h4[w[z[0]][p]-'A'][w[z[1]][p]-'A'][w[z[2]][p]-'A'][w[z[3]][p]-'A']==-1 ||
		    tagen[h4[w[z[0]][p]-'A'][w[z[1]][p]-'A'][w[z[2]][p]-'A'][w[z[3]][p]-'A']]))) break;

      // Dessutom maste vi kolla om nagra av de lodrata orden ar identiska.
      if(nr==3) {
	for(q=0;q<p;q++) 
	  if(h4[w[z[0]][p]-'A'][w[z[1]][p]-'A'][w[z[2]][p]-'A'][w[z[3]][p]-'A']==
	     h4[w[z[0]][q]-'A'][w[z[1]][q]-'A'][w[z[2]][q]-'A'][w[z[3]][q]-'A']) break;
	if(q<p) break;
      }
    }
    if(p==4) MLX(nr+1); // Allt OK, fortsatt med nasta rad
    tagen[z[nr]]=0;  //Avmarkera ordet nar vi backtrackar
  }
}
	 
    
int main(){
  int a,b,c,d;
  scanf("%d", &n);
  for(a=0;a<n;a++) scanf("%s", w[a]);
  for(a=0;a<n;a++) tagen[a]=0;

  // Satt nu varden pa variabler som ska tala om huruvida en bokstavskombination ar giltig eller ej.
  // h2 och h3 ar 1 om bokstavskombinationen (med 2 resp 3 bokstaver) ar
  // borjan pa ett ord, och 0 annars.
  // h4 innehaller ordets nummer om bokstavskombinationen (med 4 bokstaver) ar
  // ett ord, och -1 annars.

  for(a=0;a<D;a++) for(b=0;b<D;b++) for(c=0;c<D;c++) for(d=0;d<D;d++){  //Nollstall forst!
    h2[a][b]=h3[a][b][c]=1;
    h4[a][b][c][d]=-1;
  }
  for(a=0;a<n;a++) { //For varje ord, markera i tabellerna
    h2[w[a][0]-'A'][w[a][1]-'A']=1;
    h3[w[a][0]-'A'][w[a][1]-'A'][w[a][2]-'A']=1;
    h4[w[a][0]-'A'][w[a][1]-'A'][w[a][2]-'A'][w[a][3]-'A']=a;
  }
  
  MLX(0); // Fyll i ordflatan!
  return 0;
}