k;main(c,s){for(;;write(1,s+k++,1))k*=k<strlen(gets(s));}