A195603 Numerator of floor(Pi*10^n)/10^n.
3, 31, 157, 3141, 6283, 314159, 392699, 15707963, 62831853, 3141592653, 6283185307, 157079632679, 3141592653589, 31415926535897, 314159265358979, 3141592653589793, 7853981633974483, 314159265358979323, 1570796326794896619, 981747704246810387
Offset: 0
Keywords
Crossrefs
Cf. A011545.
Programs
-
Mathematica
nn=50; Numerator[With[{pidgs=N[Pi,nn]},Table[IntegerPart[pidgs 10^(n-1)]/10^n,{n,nn}]]] (* Harvey P. Dale, Sep 21 2011 *)
-
PARI
a(n,c=Pi)=numerator(c*10^n\1/10^n) \\ M. F. Hasler, Sep 21 2011