A366965 Numbers whose difference between the largest and smallest digits is equal to 8.
19, 80, 91, 108, 119, 129, 139, 149, 159, 169, 179, 180, 189, 191, 192, 193, 194, 195, 196, 197, 198, 199, 208, 219, 280, 291, 308, 319, 380, 391, 408, 419, 480, 491, 508, 519, 580, 591, 608, 619, 680, 691, 708, 719, 780, 791, 800, 801, 802, 803, 804, 805, 806, 807, 808, 810
Offset: 1
Crossrefs
Programs
-
Mathematica
Select[Range[810],Max[d=IntegerDigits[#]]-Min[d]==8 &]
-
PARI
isok(n) = my(d=digits(n)); vecmax(d) - vecmin(d) == 8; \\ Michel Marcus, Nov 05 2023
-
Python
def ok(n): return max(d:=list(map(int, str(n))))-min(d) == 8 print([k for k in range(900) if ok(k)]) # Michael S. Branicky, Oct 30 2023
Comments