OFFSET
1,1
REFERENCES
P. Giannopoulos, The Brainteasers, unpublished.
MATHEMATICA
Select[Map[FromDigits, Tuples[{0, 1, 2, 5, 8}, 3]], IntegerReverse[#] != FromDigits[IntegerDigits[#] /. {2 -> 5, 5 -> 2}] &] (* Amiram Eldar, Sep 30 2025 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
P. Giannopoulos (pgiannop1(AT)yahoo.com), Mar 13 2003
EXTENSIONS
Missing terms inserted by Sean A. Irvine, Sep 30 2025
STATUS
approved
