A040764 - OEIS

%I #17 Dec 26 2023 08:05:40

%S 28,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,

%T 4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,

%U 56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6,56,6,4,6

%N Continued fraction for sqrt(793).

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

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

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

%t Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[793],100]] (* or *) PadRight[{28},100,{56,6,4,6}] (* _Harvey P. Dale_, Jan 30 2018 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.