[工學(xué)]第3章結(jié)構(gòu)化程序設(shè)計(jì)與數(shù)組(編輯修改稿)
2024-11-12 18:44 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 為假時(shí)執(zhí)行循環(huán)體。 ? 循環(huán)體中可以出現(xiàn)語(yǔ)句 “ Exit Do”，將控制轉(zhuǎn)移到DO/LOOP結(jié)構(gòu)后一語(yǔ)句。 求兩個(gè)正整數(shù) m、 n的最大公約數(shù) Private Sub Form Click() Dim m As Integer, n As Integer, r As Integer m = InputBox(“請(qǐng)輸入 M的值： ” ) n = InputBox(請(qǐng)輸入 N的值： ) Print m。 和 。 n。 的最大公約數(shù)是： r = m Mod n Do Until ⑴ m = n : n = r : r = ⑵ Loop Print n End Sub 例 313 用以上格式（組合出 4種）的 Do/Loop循環(huán)輸出1～ 10的平方和 例 314 判斷輸入的任意正整數(shù)是否是素?cái)?shù)。 例 315 每行 10個(gè)、輸出 2～ 1000內(nèi)的素?cái)?shù)。 循環(huán)的嵌套 ? 一個(gè)循環(huán)體內(nèi)又包含了一個(gè)完整的循環(huán)結(jié)構(gòu)稱為循環(huán)的嵌套。 ? 兩個(gè)循環(huán)變量，每此外循環(huán)變化，都要執(zhí)行完一輪內(nèi)循環(huán)，循環(huán)次數(shù)是內(nèi)外次數(shù)之積。 例 For i = 1 To 9 For j = 1 To 9 se = i amp。 amp。 j amp。 = amp。 i * j Print Tab((j 1) * 9 + 1)。 se。 Next j Print Next i 思考： 打印上三角或下三角程序如何改動(dòng)？ 用二分法求方程的根 ? 步驟： ? 輸入 x x2，使得 f(x1)*f(x2)0 ? X=(x1+x2)/2 ? If f(x)*f(x1)0 Then x1=x else x2=x ? 直到 Abs(x1x2) ? 例 315 我國(guó)古代數(shù)學(xué)家在 《 算經(jīng) 》 中出了一道題： “ 雞翁一，值錢五；雞母一，值錢三；雞雛三，值錢一。百錢買百雞，問(wèn)雞翁、母、雛各幾何？ ” 。 ? 例 316 輸出乘法口訣表。 ? 例 317 計(jì)算方程 x2+y2+z2=2021的所有整數(shù)解。 ? 例 318 編程，運(yùn)行時(shí)單擊命令按鈕后，輸入 n（ n10）、然后在圖片框內(nèi)輸出 1個(gè)如圖 34所示的 n層數(shù)字金字塔（圖中所示是輸入 n=7的結(jié)果）。 多重循環(huán)應(yīng)用舉例 For ii =1 To 10 For jj=1 To 20 … Next ii Next jj For ii =1 To 10 For ii=1 To 20 … Next ii Next ii For ii =1 To 10 For jj=1 To 20 … Next jj Next ii For ii =1 To 10 … Next ii
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1