print//?map$".((@b=(0..9,A..Z))[$_*$'/$a]||$").$b[$_*$'%$a],@a:0,$/for@a=1..($a=<>)-1