main :: IO ()
main = do
  [a,b,_c,k] <- map read . words <$> getLine :: IO [Integer]
  putStrLn $ case a - b of
    n | abs n > 10^18 -> "Unfair"
      | even k        -> show n
      | otherwise     -> show (-n)
