|
|
A054259
|
|
Squares having last digit equal to the sum of the other digits.
|
|
1
|
|
|
729, 1089, 1225, 3025, 3249, 15129, 21025, 21609, 23409, 31329, 205209, 2241009, 14040009, 15000129, 20223009, 23011209, 104101209, 110313009, 1000014129, 1004010012009, 1010031030009, 10004001000120009, 10010003100300009
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[101*10^6]^2, Length[Union[Total/@TakeDrop[IntegerDigits[#], -1]]] == 1&] (* Harvey P. Dale, Aug 26 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|