string2Ints :: String -> [Int]
string2Ints str = map (\x -> read x :: Int) (words str)

main :: IO ()
main = do
    line <- getLine
    let
        [a, b, c] = string2Ints line
        divisors  = [x | x <- [a..b], c `mod` x == 0]
    print $ length divisors