import Data.List
import qualified Data.Map as Map
import Text.Printf

main =do
      t<-getLine
      let (r:d:[])=map read (words t)::[Double]
      printf "%.10f" (sqrt((d*d)-(r*r)))