OFFSET
1,4
LINKS
FORMULA
MATHEMATICA
With[{max = 10^11}, IntegerExponent[Sort[Flatten[Table[5^i*8^j, {i, 0, Log[5, max]}, {j, 0, Log[8, max/5^i]}]]], 5]] (* Amiram Eldar, Jul 09 2025 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved
