A084677 Position of the first zero in the decimal expansion of sqrt(n).

0, 2, 14, 5, 2, 5, 17, 11, 16, 2, 10, 10, 6, 3, 36, 12, 2, 6, 7, 13, 37, 16, 4, 26, 52, 2, 2, 12, 6, 9, 11, 13, 16, 14, 4, 5, 2, 2, 8, 18, 10, 3, 4, 12, 10, 3, 20, 9, 6, 2, 2, 48, 6, 4, 49, 11, 32, 13, 9, 15, 19, 4, 5, 21, 2, 2, 5, 24, 17, 3, 6, 19, 16, 5, 3, 4, 11, 17, 7, 19, 9, 2, 2, 4, 16, 19

Offset

0,2

Links

Table of n, a(n) for n=0..85.

Example

sqrt(24) = 4.8989794855663561963945681494117827839318949613133402, first zero is at position 52.

Mathematica

Join[{0}, Table[Position[RealDigits[Sqrt[n], 10, 100][[1]], 0, 1, 1], {n, 100}]// Flatten] (* Harvey P. Dale, Jan 28 2021 *)

Prog

(PARI) \\ zeros in sqrt(p) where p is prime.
frootp(n) = default(realprecision, 100); forprime(x=2, n, for(x=0, n, r = sqrt(x); print(x" "r); v = Vec(Str(r)); c=-1; for(y=1, 100, c++; if(v[y] == "0", print1(c", "); break))))

Crossrefs

Sequence in context: A316909 A103979 A183420 * A344115 A373790 A191995

Adjacent sequences: A084674 A084675 A084676 * A084678 A084679 A084680

Keyword

easy,nonn,base

Author

Cino Hilliard, Jun 29 2003

Status

approved