史萊姆論壇 - asp語言程式作業:

asp語言程式作業:
題目:從1+2+3+........+100
當累計大於5000跳離!
請問INT Tatal是多少?

答案寫這樣是否正確?

<html>
<head>
<title>Exit For中斷For迴路</title>
</head>
<body>
<center><h2>測試For Each/Exit For/Next迴路</h2></center>
<hr>
<%
' 變數宣告
Dim intI, intJ, intTotal
intTotal = 0 ' 初始值
intJ = 5000 ' 中斷值
' 迴路
For intI = 100 To 1 Step -1
intTotal = intTotal + intI
If intTotal > intJ Then
Exit For
End If
Next
Response.Write("從100加到" & inti & "大於: " & intj & "<br>")
Response.Write("inti為" & inti & "intTotal等於 " & intTotal & "<br>")
%>
</body>
</html>