OFFSET
0,3
MATHEMATICA
PadLeft[First@ #, Abs@ Last@ # + Length@ First@ #] &@ RealDigits[N[1/142, 120]] (* Bruno Berselli, Jun 21 2016 *)
Join[{0, 0}, RealDigits[1/142, 10, 120][[1]]] (* or *) PadRight[{0}, 120, {5, 0, 7, 0, 4, 2, 2, 5, 3, 5, 2, 1, 1, 2, 6, 7, 6, 0, 5, 6, 3, 3, 8, 0, 2, 8, 1, 6, 9, 0, 1, 4, 0, 8, 4}] (* Harvey P. Dale, Jul 16 2022 *)
CROSSREFS
KEYWORD
AUTHOR
STATUS
approved