$A=a;${$A++}=$_ for<>;$l-=$-=$l/3;printf'%d',$h*$e*$l*~-$l/2*$w*$-*$r*$d*($o*$o>>2)