OFFSET
1,1
LINKS
Patrick De Geest, Squares made of 3 distinct digits
EXAMPLE
66 is not in this sequence because a square number cannot end in 66; a square ending in 6 must have 1, 3, 5, 7, or 9 as its next-to-last digit.
MATHEMATICA
eLim = 6; nn = 10^eLim; t = {}; s1 = Select[Range[nn]^2, Mod[#, 10] == 6 &]; Do[s2 = Select[s1, Complement[Union[IntegerDigits[Mod[#, 10^e]]], {6, 7, 8}] == {} &]; u = Union[Mod[s2, 10^e]]; t = Union[t, u], {e, 2, eLim}]; t (* T. D. Noe, Apr 15 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. Lowell, Apr 15 2014
EXTENSIONS
Extended by T. D. Noe, Apr 15 2014
STATUS
approved