OFFSET
1,1
COMMENTS
No more terms < sqrt(5)*10^9. - David Wasserman, Aug 31 2005
EXAMPLE
2191^2=4800481 = 480 0 481
MATHEMATICA
Select[Table[Sqrt[FromDigits[Join[IntegerDigits[n], {0}, IntegerDigits[ n+1]]]], {n, 785*10^5}], IntegerQ] (* Harvey P. Dale, Oct 20 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Yalcin Aktar, Dec 12 2003
EXTENSIONS
More terms from David Wasserman, Aug 31 2005
STATUS
approved