A040056 Continued fraction for sqrt(65).
8, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16
Offset: 0
Examples
8.06225774829854965236661... = 8 + 1/(16 + 1/(16 + 1/(16 + 1/(16 + ...)))).
Links
Crossrefs
Programs
-
Maple
Digits := 100: convert(evalf(sqrt(N)),confrac,90,'cvgts'):
-
Mathematica
ContinuedFraction[Sqrt[65],300] (* Vladimir Joseph Stephan Orlovsky, Mar 08 2011 *) PadRight[{8},120,{16}] (* Harvey P. Dale, Nov 27 2020 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 49000); x=contfrac(sqrt(65)); for (n=0, 20000, write("b040056.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 07 2009
Formula
From Elmo R. Oliveira, Feb 10 2024: (Start)
a(n) = 16 = A010855(n) for n >= 1.
G.f.: 8*(1+x)/(1-x).
E.g.f.: 16*exp(x) - 8.