OFFSET
0,3
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
PROG
(Haskell)
a259043 x = if x < 10 then x else a259043 (x' + d) + d
where (x', d) = divMod x 10
(PARI) a(n) = if (n<10, n, my(u=n%10); a(n\10 + u) + u); \\ Michel Marcus, Jan 23 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Jun 17 2015
STATUS
approved