A020439 Numbers k such that the continued fraction for sqrt(k) has period 100.

2629, 3646, 4924, 5692, 5833, 5836, 6172, 6703, 6801, 7389, 7438, 8158, 8287, 8551, 8654, 9103, 10041, 10079, 10096, 10629, 10936, 11038, 11068, 11116, 11335, 11383, 11519, 11824, 11863, 11995, 12016, 12044, 12494, 12751, 12811, 12895, 13372, 13569

Offset: 1

Author

David W. Wilson

Keywords

• nonn
• changed

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)

Crossrefs

Cf. A003285.

Programs

Mathematica

nn=15000;With[{nonsq=Complement[Range[nn],Range[ Floor[Sqrt[nn]]]^2]}, Select[ nonsq,Length[ ContinuedFraction[Sqrt[#]][[2]]]==100&]] (* Harvey P. Dale, May 22 2012 *)