$A=a;${$A++}=$_ for<>;$l-=$-=$l/3;print$h*$e*$l*($l-1)/2*$w*$-*$r*$d*($%=$o*$o/4)