A010525 Decimal expansion of square root of 73.
8, 5, 4, 4, 0, 0, 3, 7, 4, 5, 3, 1, 7, 5, 3, 1, 1, 6, 7, 8, 7, 1, 6, 4, 8, 3, 2, 6, 2, 3, 9, 7, 0, 6, 4, 3, 4, 5, 9, 4, 4, 5, 5, 3, 2, 9, 5, 3, 3, 2, 8, 2, 2, 4, 1, 9, 0, 8, 6, 5, 1, 2, 5, 3, 7, 7, 1, 6, 4, 8, 8, 1, 9, 3, 2, 7, 2, 9, 8, 3, 8, 1, 0, 8, 0, 9, 7, 2, 0, 3, 0, 1, 0, 7, 0, 0, 9, 4, 2, 9, 6, 0, 0, 6, 3
Offset: 1
Examples
8.544003745317531167871648326239706434594455329533282241908651253771648....
Links
Crossrefs
Cf. A010151 (continued fraction).
Programs
-
Mathematica
RealDigits[N[73^(1/2),200]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jan 23 2012 *)
-
PARI
default(realprecision, 20080); x=sqrt(73); for (n=1, 20000, d=floor(x); x=(x-d)*10; write("b010525.txt", n, " ", d)); \\ Harry J. Smith, Jun 08 2009
Extensions
Final digits of sequence corrected using the b-file. - N. J. A. Sloane, Aug 30 2009
Comments