say [*](@($_=(0,|words))**½X-.sum/2)/4