%I #16 Dec 27 2023 01:20:06
%S 28,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,
%T 28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,
%U 56,28,56,28,56,28,56,28,56,28,56,28,56,28,56,28,56
%N Continued fraction for sqrt(786).
%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(786)),confrac);
%t Block[{$MaxExtraPrecision=1000},ContinuedFraction[Sqrt[786],120]] (* or *) PadRight[{28},120,{56,28}] (* _Harvey P. Dale_, Feb 17 2016 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.