回圈控制报告人.PPT

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
回圈控制报告人

95.12.22 95學年度資訊科技概論研習 程式語言與邏輯 結構化程式設計:迴圈控制 報告人:國立台灣師大附中 李啟龍 老師 大綱 何謂迴圈控制 迴圈結構之For-Next迴圈 迴圈結構之Do-Loop迴圈 While類型的Do-Loop迴圈 Until類型的Do-Loop迴圈 跳出迴圈指令 上機演練 回顧與討論 何謂迴圈控制 如果我們要列印出100個Hello,若一個一個寫MsgBox,則需要100個MsgBox(“Hello”),這樣的程式實在太過繁雜且撰寫耗時,幸好程式語言提供了迴圈結構(Loop),可以簡化重複動作的撰寫,只要幾行的程式就可印出100個Hello。 迴圈結構使得程式語言更具威力,且善用了電腦的好處—不厭其煩的重複執行特定程式敘述,以完成指定的動作。 迴圈結構之For-Next迴圈 迴圈結構之For迴圈 For 迴圈變數=初始值 to 終止值 Step 變量 程式區塊 Next 迴圈變數 迴圈會先比較迴圈變數之值(即初始值),是否超過終止值,若是則跳出迴圈,執行Next以後的程式區塊,否則執行For迴圈內的程式區塊。 每次執行完成程式區塊後,會將迴圈變數值設定為迴圈變數值加上變量,再判斷是否超過終止值,若是則跳出迴圈,執行Next以後的程式區塊,否則繼續執行For迴圈內的程式區塊。 重複執行以上動作,直到迴圈變數值超過終止值。 迴圈結構之Do-Loop迴圈 Do-Loop迴圈可分成使用「While」或「Until」敘述兩類,而這兩類又可再分成「先做條件式判斷,再執行程式區塊」與「先執行程式區塊,再做條件式判斷」兩子類別。 While類型的Do-Loop迴圈 (1)Do While 條件式 程式區塊 Loop 先做條件式判斷,若條件式為真,則執行程式區塊,不斷重複上述步驟,直到條件式為假,則跳出迴圈,執行Loop以後的程式。 (2)Do 程式區塊 Loop While 條件式 先執行程式區塊一次,再做條件式判斷,若條件式為真,則執行程式區塊,不斷重複上述步驟,直到條件式為假,則跳出迴圈,執行Loop以後的程式。 Until類型的Do-Loop迴圈 (1) Do Until 條件式 程式區塊 Loop 先做條件式判斷,若條件式為假,則執行程式區塊,不斷重複上述步驟,直到條件式為真,則跳出迴圈,執行Loop以後的程式。 (2)Do 程式區塊 Loop Until 條件式 先執行程式區塊一次,再做條件式判斷,若條件式為假,則執行程式區塊,不斷重複上述步驟,直到條件式為真,則跳出迴圈,執行Loop以後的程式。 跳出迴圈指令 迴圈的終止除了條件式是否成立外,尚有強制跳出迴圈的指令。 Exit For強制跳出For-Next迴圈;而Exit Do強制跳出Do-Loop迴圈。通常寫於迴圈結構內,且這兩個指令會與if-then條件判斷結合,當符合某條件時才跳出迴圈。 上機演練(題目1) 1. 累加程式1+2+…+10 上機演練(題目2) 2.累加程式1+3+5+…+99 上機演練(題目3) 3.累加程式1+2+4+7+…+106 上機演練(題目4) 4. 在螢幕上印出 * ** *** **** ***** 上機演練(題目5) 5. 在螢幕上印出 上機演練(題目6) 6.在螢幕印出 * *** ***** ******* ********* 上機演練(題目7) 7. 印出99乘法表 回顧與討論 本節重點掃描 迴圈可以重複的執行一些程式敘述,藉由控制執行的次數,可以完成我們需要的運算。 For迴圈藉由起始式、判斷式和運算式,來控制迴圈的執行與結束。 回家習題 請試著寫出求最大公因數與最小公倍數的程式。 找出1~100之間之質數,之後輸出至螢幕。 Q & A 時間 認識師大附中 感謝大家的熱情參與 天下沒有不散的研習 Q A 期待再相會。謝謝 * * 參考程式碼: Private Sub Command1_Click() Sum = 0 For i = 1 To 10 Sum = Sum + i Print i= i Sum= Sum Next End Sub 參考程式碼: Private Sub Command1_Click() Sum = 0 i = 1 Do While i 100 Sum = Sum + i Print i= i Sum= Sum i = i + 2 Loop MsgBox (Sum= Sum) End Sub 參考程式碼:(變化組合

文档评论(0)

136****3783 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档