ASP编写循环算法

来源：百度知道 编辑：UC知道 时间：2024/06/21 10:01:03
建立一个index.asp文件，在这个文件里面编写一个循环算法，从1到200进行循环，先把里面的所有奇数都给输出出来，最后也把这些奇数的和的结果给输出出来。

<%
dim i,sum
response.write "奇数:" & "<br>"
for i=1 to 200
if i mod 2 =1 then
response.write i & "   "
sum=sum+i
end if
next
response.write "<br>"
response.write "奇数的和为：" & sum
%>

<%
For i = 1 To 199 Step 2
If i = 1 Then Response.Write("<p>奇数：")
Response.Write(i & " ")
Sum = Sum + i
If i = 199 Then Response.Write("</p><p>奇数和：" & Sum & "</p>")
Next
%>