A062908 Non-palindromic number and its reversal are both even.
20, 24, 26, 28, 40, 42, 46, 48, 60, 62, 64, 68, 80, 82, 84, 86, 200, 204, 206, 208, 210, 214, 216, 218, 220, 224, 226, 228, 230, 234, 236, 238, 240, 244, 246, 248, 250, 254, 256, 258, 260, 264, 266, 268, 270, 274, 276, 278, 280, 284, 286, 288, 290, 294, 296
Offset: 1
Examples
24 and 42 are both multiples of 2.
Programs
-
ARIBAS
n := 2; stop := 410; m := 0; while m < stop do rev := int_reverse(m); if m <> rev and rev mod n = 0 then write(m," "); end; inc(m,n); end;
-
Mathematica
Select[Range[2,296,2],EvenQ[Last[x=Reverse[y=IntegerDigits[#]]]] && x!=y &] (* Jayanta Basu, May 17 2013 *)
-
PARI
isok(m) = {if (!(m%2), my(r=fromdigits(Vecrev(digits(m)))); if ((r!=m) && !(r%2), print1(m, ", ")););} \\ Michel Marcus, Oct 10 2020
Extensions
More terms from Dean Hickerson, Jul 06 2001