A027661 Fractional part of decimal expansion of sqrt(n) to 3 places.

0, 414, 732, 0, 236, 449, 646, 828, 0, 162, 317, 464, 606, 742, 873, 0, 123, 243, 359, 472, 583, 690, 796, 899, 0, 99, 196, 292, 385, 477, 568, 657, 745, 831, 916, 0, 83, 164, 245, 325, 403, 481, 557, 633, 708, 782, 856, 928, 0

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• base

References

• L. J. Comrie, Chambers's Shorter Six-Figure Mathematical Tables, Chambers, Edinburgh, 1950, Table VIII.

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..10000

Programs

Maple

a:= n-> round(1000*frac(evalf(sqrt(n)))):
seq(a(n), n=1..100);  # Alois P. Heinz, Oct 16 2013

Mathematica

Round[FractionalPart[Sqrt[Range[100]]]*1000] (* Paolo Xausa, May 02 2024 *)