asp語言程式作業:

2003-10-23, 11:33 PM

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>

snoopy · 2003-10-23, 11:55 PM

http://www.hkln.net/

參考一下

2003-10-23, 11:33 PM	#1
jinwen 榮譽勳章勳章總數 UID - 在線等級: 文章: n/a 精華:	asp語言程式作業: asp語言程式作業: 題目:從1+2+3+........+100 當累計大於5000跳離! 請問INT Tatal是多少? 答案寫這樣是否正確? <!-- 程式範例：Ch4-3-4.asp --> <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>
jinwen 榮譽勳章勳章總數 UID - 在線等級: 文章: n/a 精華:
	送花文章: 0, 收花文章: 0 篇, 收花: 0 次

2003-10-23, 11:55 PM	#2 (permalink)
snoopy 註冊會員榮譽勳章勳章總數8 UID - 33737 在線等級: 註冊日期: 2003-02-02 VIP期限: 2011-06 住址: 台南共和國文章: 1831 精華: 0 現金: 12744 金幣資產: 12834 金幣	http://www.hkln.net/ 參考一下

	送花文章: 623, 收花文章: 392 篇, 收花: 1288 次

Google 提供的廣告