A040512 - OEIS

%I #17 Dec 27 2023 01:45:39

%S 23,6,1,1,2,5,2,1,1,6,46,6,1,1,2,5,2,1,1,6,46,6,1,1,2,5,2,1,1,6,46,6,

%T 1,1,2,5,2,1,1,6,46,6,1,1,2,5,2,1,1,6,46,6,1,1,2,5,2,1,1,6,46,6,1,1,2,

%U 5,2,1,1,6,46,6,1,1,2,5,2,1,1,6,46,6,1,1,2,5,2,1,1,6

%N Continued fraction for sqrt(536).

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

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

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

%t ContinuedFraction[Sqrt[536],100] (* or *) PadRight[{23},120,{46,6,1,1,2,5,2,1,1,6}] (* _Harvey P. Dale_, Aug 21 2016 *)

%K nonn,cofr,easy,less

%O 0,1

%A _N. J. A. Sloane_.