%I #19 Jul 08 2025 23:50:34

%S 28,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,

%T 1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,

%U 1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1,18,1,1,56,1,1

%N Continued fraction for sqrt(813).

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

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

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

%t ContinuedFraction[Sqrt[813],100] (* or *) PadRight[{28},100,{56,1,1,18,1,1}] (* _Harvey P. Dale_, Jul 05 2023 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_