|
%I #15 Feb 17 2023 16:04:49
%S 8,88,232,272,424,464,616,656,696,808,848,888,2112,2552,2992,4224,
%T 4664,6336,6776,8008,8448,8888,21112,21312,21512,21712,21912,23032,
%U 23232,23432,23632,23832,25152,25352,25552,25752,25952,27072,27272,27472
%N Palindromic and divisible by 8.
%t palQ[n_]:=Module[{idn=IntegerDigits[n]},idn==Reverse[idn]];Select[ 8Range[3500],palQ] (* _Harvey P. Dale_, Jun 06 2011 *)
%t Select[8*Range[3500],PalindromeQ] (* _Harvey P. Dale_, Feb 17 2023 *)
%K nonn,base
%O 1,1
%A _Jeff Burch_
|
