main=interact$f.read;f 0="";f n=f(n`div`256)++[toEnum$fromEnum$n`mod`256]