import Data.List
import Text.Printf

main :: IO ()
main = do
    d <- sum . init . tail . sort . map read . words <$> getLine
    let s = (fromIntegral :: Int -> Double) d / 4.00
    printf ".2f" s