Y by pooq

i:0;while(a:?read\-char(?-,?-,~))#~do(if 89=?char\-int(a)then dispterms(i),i:i+1);

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

download

return to the top page