-- Repetitive Processing - How Many Divisors?

import Control.Applicative
import Text.Printf

main :: IO ()
main = do
  [a, b, c] <- map read . words <$> getLine
  printf "%d\n" (length [1 | x <- [a .. b], rem c x == 0])

