#include<string.h>
#include<iostream.h>
#include<stdio.h>
char b[10][100],c[1000],d[100],f[10][100];
int k;
void citire()
{ FILE*f=fopen("Text.in","r");
  fgets(c,1000,f);
  fclose(f);
}
void bublesort(char a[])
{ int ok=0;
  char aux;
  do { ok=0;
       for(int i=0;i<strlen(a)-1;i++)
	  if(a[i]>a[i+1])
	     { aux=a[i];
	       a[i]=a[i+1];
	       a[i+1]=aux;
	       ok=1;
	     }
       } while(ok==1);
}
FILE*g=fopen("Text.out","w");

void prelucrare()
{ char *p;
  p=strtok(c," .,;:");
  if(p) { strcpy(b[k],p);
	  k++;
	}
  while(p)
     { p=strtok(NULL," .,;:");
       if(p) { strcpy(b[k],p);
	       k++;
	     }
     }
  for(int i=0;i<k;i++)
     { strcpy(f[i],b[i]);
       bublesort(f[i]);
     }
  for(i=0;i<k-1;i++)
     for(int j=i+1;j<k;j++)
	if(strcmp(f[i],f[j])==0)
	    fprintf(g,"%s %s\n",b[i],b[j]);
  fclose(g);
}

void main()
{ citire();
  prelucrare();
}