login
Continued fraction for sqrt(408).
2

%I #23 Dec 27 2023 00:32:54

%S 20,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,

%T 5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,

%U 40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40,5,40

%N Continued fraction for sqrt(408).

%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>

%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (0,1).

%F a(n) = 5*(9+7*(-1)^n)/2 for n>0. a(n) = a(n-2) for n>2. G.f.: -5*(4*x^2+x+4) / ((x-1)*(x+1)). [_Colin Barker_, Mar 25 2013]

%p with(numtheory): Digits := 300: convert(evalf(sqrt(408)),confrac);

%t Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[408],100]]

%t (* or *)

%t PadRight[{20},100,{40,5}] (* _Harvey P. Dale_, Oct 06 2020 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.