OFFSET
1,2
COMMENTS
Conjecture: there are infinitely many pairs of consecutive terms. Example: (296,297); (413,414); (863,864).
EXAMPLE
k=17 is a term because k^2=289 and 17+2+8+9=36=6^2.
MATHEMATICA
Select[Range[0, 3300], IntegerQ[Sqrt[# + Plus @@ IntegerDigits[#^2]]] &] (* Amiram Eldar, May 18 2023 *)
PROG
(PARI) isok(k)=issquare(k+sumdigits(k^2))
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Alexandru Petrescu, May 17 2023
STATUS
approved