login
A054035
Numbers n such that n^2 contains exactly 7 different digits.
10
1017, 1023, 1024, 1027, 1028, 1036, 1037, 1042, 1113, 1117, 1164, 1175, 1176, 1197, 1228, 1267, 1268, 1277, 1302, 1307, 1323, 1328, 1343, 1352, 1355, 1375, 1395, 1405, 1428, 1433, 1441, 1442, 1444, 1463, 1541, 1593, 1594, 1628, 1646, 1648, 1701, 1706
OFFSET
1,1
MAPLE
f := []; for i from 0 to 200 do if nops({op(convert(i^2, base, 10))})=7 then f := [op(f), i] fi; od; f;
MATHEMATICA
Select[Range[2000], Count[DigitCount[#^2], 0]==3&] (* Harvey P. Dale, Jul 28 2012 *)
KEYWORD
nonn,base
AUTHOR
Asher Auel, Feb 29 2000
STATUS
approved