($a,$b,$c,$d,$e,$f)=glob<>; exit-1if$a!=$b; print sqrt(($f-$e+$c**2/4/$a+$d**2/4/$b)/$a)