%I #18 Dec 27 2023 00:05:49
%S 24,1,5,4,2,1,6,2,2,6,1,2,4,5,1,48,1,5,4,2,1,6,2,2,6,1,2,4,5,1,48,1,5,
%T 4,2,1,6,2,2,6,1,2,4,5,1,48,1,5,4,2,1,6,2,2,6,1,2,4,5,1,48,1,5,4,2,1,
%U 6,2,2,6,1,2,4,5,1,48,1,5,4,2,1,6,2,2,6,1,2,4,5,1
%N Continued fraction for sqrt(617).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_15">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,0,0,0,0,0,0,0,0,0,1).
%p with(numtheory): Digits := 300: convert(evalf(sqrt(617)),confrac);
%t ContinuedFraction[Sqrt[617],100] (* or *) PadRight[{24},100,{48,1,5,4,2,1,6,2,2,6,1,2,4,5,1}] (* _Harvey P. Dale_, Oct 17 2020 *)
%K nonn,cofr,easy,less
%O 0,1
%A _N. J. A. Sloane_.