import Data.List

main = 
    interact (calc . map read . words)
    where
        calc :: [Int] -> String
        calc (a:b:c:[]) =
            (show $ length [x | x <- [a..b], c `mod` x == 0]) ++ "\n"

