easy...

writeln((1+n)*((abs(1-n)+1)/2):2:0);