for i in range(99999): s=str(i);d=[ord(x)-ord(y)for x,y in zip(s,s[1:])] if sorted(d)==d!={-1,1}==set(d):print(s)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page