main=mapM(putStrLn.(257%))[2..36]
0%d=""
n%d=div n d%d++[(['0'..'9']++['A'..])!!mod n d]