module Main where

import Data.Functor

main :: IO ()
main =  do
  { [a,b,c] <- getInts
  ; print $ length $ filter (c `divBy`) [a..b]
  }

divBy :: Int -> Int -> Bool
divBy x y = x `mod` y == 0

getInts :: IO [Int]
getInts = map read . words <$> getLine