login
Continued fraction for sqrt(731).
1

%I #16 Dec 27 2023 01:24:30

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

%T 27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,

%U 54,27,54,27,54,27,54,27,54,27,54,27,54,27,54,27,54

%N Continued fraction for sqrt(731).

%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(731)),confrac);

%t Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[731],100]] (* or *) PadRight[{27},100,{54,27}] (* _Harvey P. Dale_, Aug 13 2023 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.