A040575 Continued fraction for sqrt(600).
24, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48, 2, 48
Offset: 0
Links
Programs
-
Maple
with(numtheory): Digits := 300: convert(evalf(sqrt(600)),confrac);
-
Mathematica
Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[600],120]] (* or *) PadRight[{24},120,{48,2}] (* Harvey P. Dale, Nov 24 2018 *)