open System

let n = int64(stdin.ReadLine())
let sq = int64(Math.Sqrt(double(n)))

let mutable x = n
let mutable cnt = 0

for i in 2L .. sq do
    let mutable k = i
    while x % k = 0L do
        x <- x / k
        cnt <- cnt + 1
        k <- k * i
    
    while x % i = 0L do
        x <- x / i

if x > 1L then
    cnt <- cnt + 1
   
printfn "%i" cnt
