OFFSET
0,1
LINKS
MAPLE
with(numtheory): Digits := 300: convert(evalf(sqrt(816)), confrac);
MATHEMATICA
ContinuedFraction[Sqrt[816], 120] (* Harvey P. Dale, May 08 2014 *)
(* Alternative: *)
PadRight[{28}, 120, {56, 1, 1, 3, 3, 3, 1, 1}] (* Harvey P. Dale, May 08 2014 *)
CROSSREFS
KEYWORD
nonn,cofr,easy,changed
AUTHOR
STATUS
approved
