$n=<>;$\+=$_*=++$i*$n--for glob<>;print