A040604 Continued fraction for sqrt(630).
25, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50, 10, 50
Offset: 0
Links
Crossrefs
Cf. A040024.
Programs
-
Maple
with(numtheory): Digits := 300: convert(evalf(sqrt(630)),confrac);
-
Mathematica
Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[630],100]] (* or *) PadRight[{25},100,{50,10}] (* Harvey P. Dale, May 20 2018 *)
Formula
G.f.: 5*(5 + 2*x + 5*x^2)/(1 - x^2). - Stefano Spezia, Dec 22 2021
a(n) = 5 * A040024(n). - Alois P. Heinz, Dec 22 2021