OFFSET
0,3
MATHEMATICA
realDigitsRecip[n_]:=With[{rd=RealDigits[1/n, 10, 120]}, Join[PadRight[{}, -rd[[2]], 0], rd[[1]]]]; realDigitsRecip[196] (* Harvey P. Dale, Aug 25 2024 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
STATUS
approved