login
Continued fraction for sqrt(738).
0

%I #19 Dec 26 2023 15:34:55

%S 27,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,

%T 6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,

%U 54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54,6,54

%N Continued fraction for sqrt(738).

%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).

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

%t Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[738],100]] (* or *) PadRight[{27},100,{54,6}] (* _Harvey P. Dale_, Apr 24 2023 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.