|
%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
|
