let rec yakusu a b c count =
  if a <= b then
    match c mod a with
    | 0 -> yakusu (a + 1) b c (count + 1)
    | _ -> yakusu (a + 1) b c count
  else
    count;;

read_line()
|> Str.split (Str.regexp " ")
|> List.map int_of_string
|> function | a :: b :: [c] -> yakusu a b c 0
            | _ -> 0;
              |> string_of_int
              |> print_endline

