s[];char*p=s,*q=s+300;main(c,f,i){p+=read(0,p,s),i=*--p%5%3,f=f?c%7|i:c%3|c*i;for(c=*p?:puts(q+1)*2,i=c>47;*--q=i&1?c:f?q++:40+!i,--i&2&&main(c%47,~i););}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page