(define n (string->number (read-line))) (print (exact (* n (+ n 1) 0.5)))