($a,$b,$c,$d,$e,$f)=glob<>;
$_/=$a for $c,$d,$e,$f;
print sqrt$f-$e+($c*$c+$d*$d)/4;