A010504 Decimal expansion of square root of 51.
7, 1, 4, 1, 4, 2, 8, 4, 2, 8, 5, 4, 2, 8, 4, 9, 9, 9, 7, 9, 9, 9, 3, 9, 9, 8, 1, 1, 3, 6, 7, 2, 6, 5, 2, 7, 8, 7, 6, 6, 1, 7, 1, 1, 5, 9, 9, 0, 2, 7, 3, 3, 8, 3, 3, 2, 0, 8, 4, 3, 0, 8, 8, 2, 7, 6, 5, 8, 2, 0, 4, 0, 6, 4, 4, 0, 0, 2, 1, 8, 8, 6, 2, 5, 8, 9, 8, 8, 2, 1, 3, 5, 3, 2, 8, 2, 0, 4, 1
Offset: 1
Examples
7.141428428542849997999399811367265278766171159902733833208430882765820...
Links
Crossrefs
Cf. A040043 (continued fraction).
Programs
-
Maple
Digits:=100; evalf(sqrt(51)); # Wesley Ivan Hurt, Mar 04 2014
-
Mathematica
RealDigits[N[Sqrt[51],200]][[1]] (* Vladimir Joseph Stephan Orlovsky, Feb 24 2011 *)
-
PARI
{ default(realprecision, 20080); x=sqrt(51); for (n=1, 20000, d=floor(x); x=(x-d)*10; write("b010504.txt", n, " ", d)); } \\ Harry J. Smith, Jun 06 2009
Comments