integer(KIND=8)::N
      read*,N
      print*,N/(2-MOD(N,2))
end