|
%I #15 Sep 08 2022 08:44:45
%S 0,1,1,4,9,4,2,5,2,8,7,3,5,6,3,2,1,8,3,9,0,8,0,4,5,9,7,7,0,1,1,4,9,4,
%T 2,5,2,8,7,3,5,6,3,2,1,8,3,9,0,8,0,4,5,9,7,7,0,1,1,4,9,4,2,5,2,8,7,3,
%U 5,6,3,2,1,8,3,9,0,8,0,4,5,9,7,7,0,1,1,4,9,4,2,5,2,8,7,3,5,6,3
%N Decimal expansion of 1/87.
%C This is the case k=13 in Sum_{i>=0} k^i/100^(i+1) = 1/(100-k) for |k| < 100. - _Bruno Berselli_, Aug 23 2017
%e .011494252873563218390804597701149425287356321839080459770114942528735632...
%t Join[ConstantArray[0, Abs@Last@#], First@#]&@RealDigits@N[1/87, 100] (* _Vincenzo Librandi_, Aug 24 2017 *)
%o (Magma) n:=1/87; [0] cat Reverse(Intseq(Floor(10^100*n))); // _Vincenzo Librandi_, Aug 24 2017
%K nonn,cons
%O 0,4
%A _N. J. A. Sloane_
|
