read(*,*)n
a=0
do i=1,n
   a=a+i
end do
write(*,*)a
end