OFFSET
0,1
MATHEMATICA
a[n_]:=StringLength[StringDelete[IntegerName[n, {"Bulgarian"}], " "]]; Array[a, 71, 0] (* Stefano Spezia, May 22 2026 *)
CROSSREFS
KEYWORD
nonn,word
AUTHOR
Stefano Spezia, Jun 01 2021
STATUS
approved
