do 3e3
call charout,x2c(b2x(reverse(x2b(c2x(charin())))))
end