OFFSET
0,1
LINKS
MAPLE
with(numtheory): Digits := 300: convert(evalf(sqrt(731)), confrac);
MATHEMATICA
Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[731], 100]] (* or *) PadRight[{27}, 100, {54, 27}] (* Harvey P. Dale, Aug 13 2023 *)
CROSSREFS
KEYWORD
nonn,cofr,easy
AUTHOR
STATUS
approved