import Data.Bool

main :: IO ()
main = readLn >>= putStrLn . solve

solve :: Int -> String
solve = toAnswer . is753

toAnswer :: Bool -> String
toAnswer = bool "NO" "YES"

is753 :: Int -> Bool
is753 n = n `elem` [3,5,7]
