import Control.Monad import Control.Applicative main :: IO () main = do n <- read <$> getLine :: IO Integer print $ head $ do x <- [3..] if x ^ 2 > n then return n else do guard $ n `mod` x == 0 return x