import Control.Applicative

main = do
  [a,b] <- (map read . words) <$> getLine
  [c,d] <- (map read . words) <$> getLine
  putStrLn . show $ (abs (a-c) + abs (b-d)) / 2.0