OFFSET
1,2
COMMENTS
LINKS
Eric M. Schmidt, Table of n, a(n) for n = 1..1000
MATHEMATICA
Table[ Select[ Range[10^(k - 1), 10^k - 1], Mod[ #^2, 10^k] == 1 &], {k, 7}] // Flatten
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Robert G. Wilson v, Nov 01 2010
STATUS
approved