main :: IO ()
main = do
  [t, a, b] <- map read . words <$> getLine
  print $ solve t a b

solve :: Integral a => a -> a -> a -> a
solve t a b = f a + f b - f (lcm a b)
  where
    f x = div t x + signum (mod t x)