main=putStrLn.show.(\a->if (a-7>0) && (a/2>7) then a-7 else -1).read=<<getLine