数列求和.prg

常用算法

*sum=1+2+3……+100
sum=0
I=1
do while I<=100
         sum=sum+I
         I=I+1
Enddo
?"sum=",sum