import Control.Applicative
import Text.Printf

main :: IO ()
main = solve <$> f >>= printf "%f\n"
  where
    f = map read <$> words <$> getLine

solve :: [Double] -> Double
solve [r, d] = sqrt $ d * d - r * r