OFFSET
0,2
REFERENCES
W. Rudin, Principles of Mathematical Analysis, 3rd ed., McGraw-Hill, 1976.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..995 (terms 0..200 from Vincenzo Librandi)
MATHEMATICA
Round[Table[N[Sqrt[2], k] 10^(k - 1), {k, 20}]] (* Vincenzo Librandi, Aug 17 2013 *)
Module[{nn=20, s}, s=RealDigits[Sqrt[2], 10, nn+1][[1]]; Table[Round[ FromDigits[ Take[ s, n+1]]/10], {n, nn}]] (* Harvey P. Dale, Apr 04 2019 *)
PROG
(Python)
from math import isqrt
def A011548(n): return (m:=isqrt(k:=10**(n<<1)<<1))+int((k-m*(m+1)<<2)>=1) # Chai Wah Wu, Jul 29 2022
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved