DigitCount[7!, 10, 0]