module Main where

main :: IO ()
main = readLn >>= print . (`div` 2) . succ