login
A040618
Continued fraction for sqrt(644).
2
25, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2, 50, 2, 1, 1, 1, 6, 1, 1, 1, 2
OFFSET
0,1
MAPLE
with(numtheory): Digits := 300: convert(evalf(sqrt(644)), confrac);
MATHEMATICA
ContinuedFraction[Sqrt[644], 120] (* or *) PadRight[{25}, 120, {50, 2, 1, 1, 1, 6, 1, 1, 1, 2}] (* Harvey P. Dale, Jan 17 2016 *)
PROG
(PARI) default(realprecision, 100); contfrac(sqrt(644)) \\ Michel Marcus, Mar 26 2015
CROSSREFS
Sequence in context: A040649 A104707 A353700 * A040619 A040617 A065781
KEYWORD
nonn,cofr,easy
STATUS
approved