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