program main
    implicit none

    integer::n,i,sum=0
    read *, n
    do i=1,n
     sum=sum+i
     end do
  write (*,*) sum
end program main