|
|
A273159
|
|
Numbers whose digit sum is divisible by 7.
|
|
1
|
|
|
0, 7, 16, 25, 34, 43, 52, 59, 61, 68, 70, 77, 86, 95, 106, 115, 124, 133, 142, 149, 151, 158, 160, 167, 176, 185, 194, 205, 214, 223, 232, 239, 241, 248, 250, 257, 266, 275, 284, 293, 304, 313, 322, 329, 331, 338, 340, 347, 356, 365, 374, 383, 392, 399, 403, 412, 419, 421, 428, 430, 437, 446, 455, 464
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[0, 500], Divisible[Total[IntegerDigits[#]], 7]&] (* Harvey P. Dale, May 15 2019 *)
|
|
PROG
|
(PARI) for(n=0, 10^3, if(sumdigits(n)%7==0, print1(n, ", "))); \\ Joerg Arndt, May 17 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|