find anagrams by stac

main(a,b){char*p,s[9];while((b=getchar())-10)a*=b;while(a-b?0:puts(s),b=1,gets(p=s))while(*p)b*=*p++;}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top