say sqrt($!*-[*] @($_=words)X-$!=.sum/2)/4