for($,17,1e4,n:= $;while((n%10-(n=n/10|0)%10)abs>5,0)n>0or$println)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page