鹰潭到景德镇多少公里:求一个简单的BASIC的程序

来源:百度文库 编辑:神马品牌网 时间:2024/05/01 22:24:21
题目:求100以内自然数的和,即S=1+2+3+...+100

保证送分20+20(我要看了程序,觉得好才加后面的这个分)

dim sum
for i=1 to 100
sum=sum+i
next
print sum '这个就是值啦

dim i as integer,s as integer
for i=1 to 100
s=s+i
next
print s

(1+100)*100*1/2