OFFSET
0,3
MATHEMATICA
Select[Range[0, 500], Max[Differences[Length/@Split[IntegerDigits[#, 8]]]] < 0&] (* Harvey P. Dale, Nov 14 2020 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Feb 15 1999
STATUS
approved