$n=<>-1; $r=$n%36; for(12..89){ /./; if($&<$'){ if(!$r--){ $a=$_; } } } print$a,$a%10 x($n/36);