import Control.Applicative import Data.List main = do es <- map (read :: String -> Double) . words <$> getLine print . calc $ sort es calc [e1, e2] = sqrt $ e2^2 - e1^2