$n=<>;print $n*$n/2+$n-$n*$n/4