procedure main() every|write((k:=ior(read()^.5+.5,0))*11+k%10)\read() end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page