|
|
A062900
|
|
Number and its reversal are both multiples of 8.
|
|
2
|
|
|
8, 80, 88, 232, 272, 424, 464, 616, 656, 696, 800, 808, 840, 848, 880, 888, 2112, 2136, 2152, 2176, 2192, 2304, 2320, 2328, 2344, 2360, 2368, 2384, 2512, 2536, 2552, 2576, 2592, 2704, 2720, 2728, 2744, 2760, 2768, 2784, 2912, 2936, 2952, 2976, 2992, 4016, 4032, 4056, 4072, 4096
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
2152 and 2512 are both multiples of 8.
|
|
MATHEMATICA
|
Select[8*Range[700], Divisible[IntegerReverse[#], 8]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 18 2016 *)
|
|
PROG
|
(ARIBAS): n := 8; stop := 4200; m := n; while m < stop do rev := int_reverse(m); if rev mod n = 0 then write(m, " "); end; inc(m, n); end;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|