UC知道运用for each next语句计算1+3+5+7+。。。。。。+201多少？
来源：百度知道 编辑：UC知道 时间：2024/06/23 20:03:10
运用for each next语句计算1+3+5+7+。。。。。。+201多少？
这是我写的语句段，不知道哪里错了，请高手指点一下。
<%
dim a,b,array(),element,sum
sum=0
b=0
for a=1 to 201 step 2
array(b)=a
b=b+1
next
for each element in array
sum=sum+element
next
response.write "1+3+5+7+......+201="&sum
%>
这是我写的语句段，不知道哪里错了，请高手指点一下。
<%
dim a,b,array(),element,sum
sum=0
b=0
for a=1 to 201 step 2
array(b)=a
b=b+1
next
for each element in array
sum=sum+element
next
response.write "1+3+5+7+......+201="&sum
%>
dim a,array(),element,sum
sum=0
for a=1 to 201 step 2
rem 重定义array()大小,并保护其已赋值的元素
redim preserve array((a-1)/2)
array((a-1)/2)=a
next
for each element in array
sum=sum+element
next
response.write "1+3+5+7+......+201="&sum
%>