for n=9to 1e4m=n while(mod(m,10)<mod(int(m/10),10))m=int(m/10) if!m>9?n wend next
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page