%I #13 Oct 10 2020 12:15:05

%S 20,24,26,28,40,42,46,48,60,62,64,68,80,82,84,86,200,204,206,208,210,

%T 214,216,218,220,224,226,228,230,234,236,238,240,244,246,248,250,254,

%U 256,258,260,264,266,268,270,274,276,278,280,284,286,288,290,294,296

%N Non-palindromic number and its reversal are both even.

%e 24 and 42 are both multiples of 2.

%t Select[Range[2,296,2],EvenQ[Last[x=Reverse[y=IntegerDigits[#]]]] && x!=y &] (* _Jayanta Basu_, May 17 2013 *)

%o (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;.

%o (PARI) isok(m) = {if (!(m%2), my(r=fromdigits(Vecrev(digits(m)))); if ((r!=m) && !(r%2), print1(m, ", ")););} \\ _Michel Marcus_, Oct 10 2020

%Y Cf. A029742 (non-palindromic), A005843 (even numbers).

%K nonn,base,easy

%O 1,1

%A _Amarnath Murthy_, Jul 01 2001

%E More terms from _Dean Hickerson_, Jul 06, 2001