使用VBScript语言，以三种不同方法实现1~100的累加，并显示结果。

使用VBScript语言，以三种不同方法实现1~100的累加，并显示结果。

1.

dim sum

sum=0
for i=1 to 100
sum=sum+i
next
response.write sum

2.

dim sum,i

sum=0

i=0

do while i<=100

sum=sum+i

loop

response.write sum

3.

dim sum,i

sum=0

i=0

do until i>100

sum=sum+i

loop

response.write sum

<script language=vbscript> j=100

for i=1 to j k=k+i next alert k

alert (j+1)*(j/2)

while r<=j s=s+r r=r+1 wend

alert s

</script>

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息