import Control.Monad (replicateM) main = replicateM 2 getLine >>= print . solve . map (map (read :: String -> Double) . words) solve [a, b] = sum $ map (abs . (/2)) $ zipWith (-) a b