OFFSET
0,3
COMMENTS
a(20) > 10^14. - Giovanni Resta, Jul 27 2018
LINKS
Eric Weisstein's World of Mathematics, Square Number
MATHEMATICA
a[n_] := Block[{k=0}, While[DigitCount[k^2, 10, 1] != n, k++]; k]; Array[a, 8, 0] (* Giovanni Resta, Jul 27 2018 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Patrick De Geest, Mar 15 1999
EXTENSIONS
More terms from Jon E. Schoenfield, Jan 11 2009
Initial zero added by Zak Seidov, Nov 22 2010
a(17)-a(19) from Giovanni Resta, Jul 27 2018
STATUS
approved