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