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