OFFSET
1,2
MATHEMATICA
Flatten[Position[Flatten[IntegerDigits/@(Range[200]^2)], 1]] (* Harvey P. Dale, Aug 14 2014 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Oct 30 2010
STATUS
approved
