import Control.Applicative ((<$>)) import Text.Printf (printf) main :: IO () main = do [vl, vr] <- fmap read . words <$> getLine :: IO [Double] d <- readLn :: IO Double w <- readLn :: IO Double printf "%.12f\n" (d / (vl + vr) * w)