编程实现求Sum=1+（1+2）+（1+2+3）+（1+2+3+4）+ … … +(1+2+3+4+ … + n)(n是从键盘输入的正整数)

isum=0 jsum=0 read(*,*) n do i=1,n do j=1,i jsum=jsum+j enddo isum=isum+jsum jsum=0 enddo print*,isum end 这是fortran程序，自己改成vb语法或其他你自己需要的语法即可