login
A065788
a(1) = 64; for n > 1 a(n) is the smallest square > a(n-1) with a(n-1) forming its final digits.
3
64, 1764, 6041764, 96126041764, 8584885596126041764, 1094573934406914368584885596126041764, 164840278246153785356947805564195221094573934406914368584885596126041764
OFFSET
1,1
COMMENTS
a(n) = A050636(n+1) for n >= 1.
MATHEMATICA
nxt[n_]:=Module[{k=1}, While[!IntegerQ[Sqrt[k*10^IntegerLength[n]+n]], k++]; k*10^IntegerLength[n]+n]; NestList[nxt, 64, 6] (* Harvey P. Dale, Dec 14 2019 *)
KEYWORD
base,nonn
AUTHOR
Klaus Brockhaus, Nov 19 2001
STATUS
approved