引用引用第1楼lusihui于2023-08-29 13:11发表的 :sum:=0;for Number1:=0 to 100 by 1 dosum:=sum+arr[Number1];end_for;