login
A040033
Continued fraction for sqrt(40).
2
6, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3, 12, 3
OFFSET
0,1
EXAMPLE
6.3245553203367586639977870... = 6 + 1/(3 + 1/(12 + 1/(3 + 1/(12 + ...)))). - Harry J. Smith, Jun 05 2009
MAPLE
Digits := 100: convert(evalf(sqrt(N)), confrac, 90, 'cvgts'):
MATHEMATICA
ContinuedFraction[Sqrt[40], 300] (* Vladimir Joseph Stephan Orlovsky, Mar 06 2011 *)
LinearRecurrence[{0, 1}, {6, 3, 12}, 100] (* or *) PadRight[{6}, 100, {12, 3}] (* Harvey P. Dale, Mar 03 2018 *)
PROG
(PARI) { allocatemem(932245000); default(realprecision, 32000); x=contfrac(sqrt(40)); for (n=0, 20000, write("b040033.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 05 2009
CROSSREFS
Cf. A010494 Decimal expansion. - Harry J. Smith, Jun 05 2009
Sequence in context: A131894 A368679 A335393 * A165998 A322091 A329583
KEYWORD
nonn,cofr,easy
STATUS
approved