В таком виде задача сводится просто к вычислению факториала. Что вполне может быть олимпиадной задачей по программированию с соответствующими ограничениями на

.
Тут есть какая-то теория?
Ни теории тут никакой нет, ни олимпиадности.
Table[Count[IntegerDigits[n!], 0], {n, 0, 100}], только и всего, как верно написано в OEIS. Нет, ну если поставлена задача решить это, например, в Си — другое дело. Но ведь тема создана в математическом разделе.