OFFSET
2,1
COMMENTS
Ending in 6 is a must for a number to be part of this sequence
EXAMPLE
a(5) cannot be 104^2 = 10816 because 16 (the last 2 digits) makes a square. 114^2 = 12996 qualifies.
MATHEMATICA
bad[n_] := Block[{q = n^2, p = 10}, While[p < q, If[IntegerQ@Sqrt@Mod[q, p], Break[], p *= 10]]; p < q]; a[n_] := Block[{k = Ceiling[10^((n - 1)/2)]}, While[bad@k, k++]; k^2]; a /@ Range[2, 20] (* Giovanni Resta, Mar 11 2013 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. Lowell, Nov 24 2010
EXTENSIONS
a(12)-a(20) from Giovanni Resta, Mar 11 2013
STATUS
approved