char s[99];i,j,k;main(f){for(i=strlen(gets(s))-1;f&&i--;)for(j=0;f&&s[i+j];j++)for(f=k=0;j+k