login
Numerator of floor(Pi*10^n)/10^n.
1

%I #10 Jan 27 2021 10:05:27

%S 3,31,157,3141,6283,314159,392699,15707963,62831853,3141592653,

%T 6283185307,157079632679,3141592653589,31415926535897,314159265358979,

%U 3141592653589793,7853981633974483,314159265358979323,1570796326794896619,981747704246810387

%N Numerator of floor(Pi*10^n)/10^n.

%t nn=50; Numerator[With[{pidgs=N[Pi,nn]},Table[IntegerPart[pidgs 10^(n-1)]/10^n,{n,nn}]]] (* _Harvey P. Dale_, Sep 21 2011 *)

%o (PARI) a(n,c=Pi)=numerator(c*10^n\1/10^n) \\ _M. F. Hasler_, Sep 21 2011

%Y Cf. A011545.

%K nonn

%O 0,1

%A _M. F. Hasler_, following a suggestion by _Eric Angelini_, Sep 21 2011