main = do [px, py] <- map read . words <$> getLine [qx, qy] <- map read . words <$> getLine print $ 0.5 * (abs(px - qx) + abs(py - qy))