import Data.Bool
main :: IO ()
main = readLn >>= print . (\n -> bool (15 - n) (-1) (n >= 15))