puts F[eval gets]while F=proc{|n|k=9-n%37 n>0?F[n/37]<<'9&`'[k/26]-k:''}