login
Continued fraction for sqrt(668).
1

%I #16 Dec 27 2023 01:28:49

%S 25,1,5,2,12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2,12,2,

%T 5,1,50,1,5,2,12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2,

%U 12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2,12,2,5,1,50,1,5,2

%N Continued fraction for sqrt(668).

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

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

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

%t ContinuedFraction[Sqrt[668],90] (* or *) PadRight[{25},90,{50,1,5,2,12,2,5,1}] (* _Harvey P. Dale_, Jan 23 2013 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.