main = do
	[xa, ya, xb, yb] <- getContents >>= return . concat . map (map read . words) . lines
	print $ xa * (yb - ya) / (xa + xb) + ya