|
0, 8, 17, 26, 35, 44, 53, 62, 71, 79, 80, 88, 97, 107, 116, 125, 134, 143, 152, 161, 169, 170, 178, 187, 196, 206, 215, 224, 233, 242, 251, 259, 260, 268, 277, 286, 295, 305, 314, 323, 332, 341, 349, 350, 358, 367, 376, 385, 394, 404, 413, 422, 431, 439, 440, 448, 457, 466
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range@ 600, Mod[Total@ IntegerDigits@ #, 8] == 0 &] (* Michael De Vlieger, May 19 2016 *)
|
|
PROG
|
(PARI) isok(n) = sumdigits(n) % 8 == 0; \\ Michel Marcus, May 18 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|