import Data.List main :: IO () main = interact $ show . flip (/) 4.0 . fromIntegral . sum . init . tail . sort . map read . words