第四章控制結(jié)構(gòu)-資料下載頁(yè)
2025-09-19 12:32本頁(yè)面
【導(dǎo)讀】順序結(jié)構(gòu)就是各語(yǔ)句按出現(xiàn)的先后次序執(zhí)行。一般的程序設(shè)計(jì)語(yǔ)言中，順序結(jié)。構(gòu)的語(yǔ)句主要是賦值語(yǔ)句、輸入/輸出語(yǔ)句等。可以通過(guò)文本框、print方法等實(shí)現(xiàn)，也可以通過(guò)系統(tǒng)提供的函數(shù)和過(guò)程來(lái)實(shí)現(xiàn)。程序執(zhí)行時(shí)，先計(jì)算右邊表達(dá)式的值，然后將值賦給左邊的變量或?qū)傩?。在賦值語(yǔ)句中，賦值運(yùn)算符“=”代表賦值操作，而不代表等量關(guān)系。1）表達(dá)式均為數(shù)值型，但精度不同時(shí)，表達(dá)式。3)變量為數(shù)值型，表達(dá)式為邏輯型時(shí)，true. 5)變量為字符型，表達(dá)式為非字符型時(shí)，表達(dá)。以下的賦值語(yǔ)句均是錯(cuò)誤的:. 各項(xiàng)參數(shù)次序必須一一對(duì)應(yīng)，Prompt項(xiàng)不可省。其他項(xiàng)可以省略，但處于中間的默認(rèn)參數(shù)要用。MsgBox（）函數(shù)可以產(chǎn)生一個(gè)消息框，等待用戶選擇按鈕，當(dāng)用戶單擊某個(gè)按鈕時(shí)，函數(shù)返回按鈕的值，類型為整型。其按鈕、圖表設(shè)置值及意義如下表所示：。的值按非零為T(mén)rue，零為False進(jìn)行處理。如果采用形式表示則
【正文】 … Next jj Next ii For ii =1 To 10 … Next ii For ii =1 To 10 … Next ii 對(duì)于循環(huán)的嵌套，要注意以下事項(xiàng)： ?內(nèi)循環(huán)變量與外循環(huán)變量不能同名； ?外循環(huán)必須完全包含內(nèi)循環(huán)，不能交叉； ?不能從循環(huán)體外轉(zhuǎn)向循環(huán)體內(nèi)，反之則可以。 正確 錯(cuò)誤 對(duì)于循環(huán)的嵌套，需要注意以下事項(xiàng)： 內(nèi)循環(huán)變量與外循環(huán)變量不能同名。 外循環(huán)必須完全包含內(nèi)循環(huán)，不能交叉。 以下程序段是錯(cuò)誤的： （ 1）內(nèi)外循環(huán)變量同名錯(cuò)誤： For i＝ 1 To 10 For i ＝ 1 To 20 … . Next i Next i （ 2）內(nèi)外循環(huán)交叉 For i ＝ 1 To 10 For j＝ 1 To 10 … Next i Next j 其他輔助控制語(yǔ)句 1. Go To 語(yǔ)句 形式 : Go To {標(biāo)號(hào) |行號(hào) } 作用：無(wú)條件地轉(zhuǎn)移到標(biāo)號(hào)或行號(hào)指定的那行語(yǔ)句 . 標(biāo)號(hào)是一個(gè)字符序列 ,行號(hào)是一個(gè)數(shù)字序列 . 多種形式： Exit For、 Exit Do、 Exit Sub、 Exit Function等 。 作用：退出某種控制結(jié)構(gòu)的執(zhí)行 。 3. End語(yǔ)句 多種形式： End、 End If、 End Select、 End With、 End Type、 End Sub、 End Function、 作用： End結(jié)束一個(gè)程序的運(yùn)行；其余表示某個(gè)結(jié)構(gòu)的結(jié)束，與對(duì)應(yīng)的結(jié)構(gòu)語(yǔ)句配對(duì)出現(xiàn)。 常用算法（一） 算法是對(duì)某個(gè)問(wèn)題求解過(guò)程的描述 1. 累加、連乘 1～ 100的 5或 7的倍數(shù)的和 Sum = 0 For i = 1 To 100 If i Mod 5 = 0 Or i Mod 7 = 0 Then Sum = Sum + i End If Next i Print Sum 3～ 10的乘積 t = 1 For i =3 To 10 t = t * i Next i Print t 思考： 若把循環(huán)體前面置各變量初值的語(yǔ)句放在循環(huán)體內(nèi)，程序運(yùn)行時(shí)會(huì)產(chǎn)生什么情況？ “窮舉法”也稱為“枚舉法”或“試湊法”，即將可能出現(xiàn)的各種情況一一測(cè)試，判斷是否滿足條件，一般采用循環(huán)來(lái)實(shí)現(xiàn)。 例 百元買百雞問(wèn)題 。 假定小雞每只 5角 ， 公雞每只 2元 ， 母雞每只 3元 。 現(xiàn)在有 100元錢(qián)要求買 100只雞 ， 編程列出所有可能的購(gòu)雞方案。 設(shè)母雞 、 公雞 、 小雞各為 x、 y、 z只 ， 根據(jù)題目要求 ， 列出方程為： x+y+y=100 3x+2y+=100 三個(gè)未知數(shù)，兩個(gè)方程，此題有若干個(gè)解。 解決此類問(wèn)題采用“試湊法”，把每一種情況都考慮到。 方法一：最簡(jiǎn)單三個(gè)未知數(shù)利用三重循環(huán)來(lái)實(shí)現(xiàn)。 方法二：從三個(gè)未知數(shù)的關(guān)系，利用兩重循環(huán)來(lái)實(shí)現(xiàn)。 For x=0 to 100 For y=0 to 100 For z=0 to 100 if (x+y+z=100 and _ 3*x+2*y+*z=100) then Print x,y,z end if next z Next y next x For x=0 to 33 For y=0 to 50 if (3*x+2*y+*(100xy)=100) then Print x,y,z end if Next y next x “遞推法”又稱為“迭代法”，其基本思想是把一個(gè)復(fù)雜的計(jì)算過(guò)程轉(zhuǎn)化為簡(jiǎn)單過(guò)程的多次重復(fù)。每次重復(fù)都從舊值的基礎(chǔ)上遞推出新值，并由新值代替舊值。 例 猴子吃桃子 。 小猴在某天摘桃若干個(gè) ， 當(dāng)天吃掉一半多一個(gè)；第二天吃了剩下的桃子的一半多一個(gè)；以后每天都吃尚存桃子的一半多一個(gè) ， 到第 7天要吃時(shí)只剩下一個(gè) ， 問(wèn)小猴共摘下了多少個(gè)桃子 ？ 分析：這是一個(gè) “ 遞推 ” 問(wèn)題 ， 先從最后一天推出倒數(shù)第二天的桃子 ， 再?gòu)牡箶?shù)第二天的桃子推出倒數(shù)第三天的桃子 …… 。 設(shè)第 n天的桃子為 xn， 那么它是前一天的桃子數(shù) 的 xn1 的一半減 1， 即 xn =（ xn1 +1） 2 Private Sub Form_Click() Dim n%, i% x = 1 Print 第 7天的桃子數(shù)為 1只 For i = 6 To 1 Step 1 x = (x + 1) * 2 Print 第 。 i。 天桃子的數(shù)為： 。 x。 只 Next i End Sub 例 實(shí)際應(yīng)用 ， 求最短殘料 。 有一根長(zhǎng)度為 321米的鋼材料 ， 要將它截取成兩種規(guī)格 a、 b的長(zhǎng)度分別為 17米和 27米的短料 ， 每種至少 1段 ， 問(wèn)分隔成 a， b各多少段后 ，剩余的殘料 r最少 ？ 分析 ， 該題利用 “ 試湊法 ” 通過(guò)二重循環(huán)求殘料 r的最小值正數(shù) ， 殘料不可能是負(fù)數(shù) 。 程序如下： Private Sub Command1_Click() Dim a%, b%, r!, ia%, ib% r = 321 ? 最小值初值取鋼材料的長(zhǎng)度 For b = 1 To 321 \ 27 ? b最多的段數(shù) For a = 1 To 321 \ 17 b ? a最多的段數(shù) t = 321 b * 27 a * 17 ? 當(dāng)前的殘料 If t 0 And t r Then r = t ? 求最短的殘料 ia = a ? 最短殘料時(shí) a的段數(shù) ib = b ? 最短殘料時(shí) b的段數(shù) End If Next a Next b Print ia, ib, r End Sub
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1