【正文】 ? 【 算法描述 】 ? （ 1）輸入隨機(jī)數(shù)的個(gè)數(shù) n； ? （ 2）定義數(shù)組 x(n)； ? （ 3）利用 RND函數(shù)產(chǎn)生 n個(gè) 10～ 99之間的整數(shù)，并存放在數(shù)組 x中； ? （ 4）輸入待查找的數(shù) k； ? （ 5）把 k與數(shù)組 x中的每一個(gè)數(shù)相比較； ? （ 6）輸出結(jié)果； ? （ 7）結(jié)束。下面我們將會(huì)看到，數(shù)組的使用給數(shù)據(jù)的輸入和查找等處理帶來的方便。 第二節(jié) 一字排開 ——一維數(shù)組 應(yīng) 知 應(yīng) 會(huì) ? １ .熟練掌握數(shù)組的特點(diǎn)及使用方； ? ２ .靈活運(yùn)用數(shù)組知識(shí)解決實(shí)際問題。 ? 【 算法描述 】 ? （ 1）定義數(shù)組 a； ? （ 2）把 10個(gè)數(shù)分別輸入 a(1)， a(2)， …a(10) 中； ? （ 3）輸出 a(10)， a(9)， …a(1) 的值； ? （ 4）結(jié)束。有兩個(gè)下標(biāo)的數(shù)組稱為二維數(shù)組，有 n個(gè)下標(biāo)的數(shù)組稱為 n維數(shù)組。 ? 數(shù)組的定義： ? 格式： DIM 數(shù)組名 (最大下標(biāo) ) ? 作用：說明數(shù)組的維數(shù)和數(shù)組元素的個(gè)數(shù)。 ? 在程序中使用數(shù)組應(yīng)遵循“先定義后使用”的原則。數(shù)組中的各個(gè)數(shù)據(jù)用帶下標(biāo)的數(shù)組名來區(qū)分，并規(guī)定將下標(biāo)用括號(hào)括起來。 ? 【 建議課時(shí) 】 ? 5課時(shí) 第一節(jié) 整裝待發(fā) ——認(rèn)識(shí)數(shù)組 應(yīng) 知 應(yīng) 會(huì) ? １ .理解數(shù)組的概念及用途； ? ２ .掌握數(shù)組的定義及用法。 ? 【 學(xué)習(xí)評(píng)價(jià)建議 】 ? 通過練習(xí)、作業(yè)或小測(cè)驗(yàn)的方式來檢驗(yàn)學(xué)生對(duì)數(shù)組的理解和在程序編寫中使用技巧的掌握情況。 ? 【 學(xué)習(xí)資源 】 ? QBASIC環(huán)境 ? 【 學(xué)習(xí)過程 】 ? 首先是教師講解數(shù)組的概念和程序中定義數(shù)組的方法，說明數(shù)組的實(shí)際應(yīng)用，使數(shù)組和實(shí)際生活中的具體問題聯(lián)系起來，并通過實(shí)例分析和演示各種情況下數(shù)組的應(yīng)用，說明數(shù)組的使用技巧，讓學(xué)生掌握數(shù)組的使用，在教師的幫助下，完成本單元實(shí)例程序的編寫和調(diào)試，完成對(duì)數(shù)組這種數(shù)據(jù)結(jié)構(gòu)的掌握。當(dāng)然 ,出售金魚時(shí)都是整數(shù)條 ,不能有任何破損。第四次賣出余下的五分之一加五分之一條金魚。第二次賣出剩余的三分之一加三分之一條金魚 。 ? 13．出售金魚者決定將缸里的金魚全部賣出。 ? 10．有一個(gè)三位數(shù)，它的各位數(shù)字之和的 11倍恰好等于它自身，請(qǐng)編程求出這個(gè)三位數(shù)。 ? 8．求兩個(gè)正整數(shù) m和 n的最大公約數(shù)。所謂的角谷猜想是：對(duì)于任意大于 1的自然數(shù) n，若 n為奇數(shù)，則將 n變?yōu)?3*n+1，否則將n變?yōu)?n的一半。問母雞、公雞、小雞各買多少只？ 6．求 1!+2!+…+10! 的值。假設(shè)發(fā)射時(shí)刻絕對(duì)準(zhǔn)確，問能聽到多少聲禮炮聲？ ? 3．用一張一元票換 1分、 2分和 5分的硬幣，每種至少一枚，問有哪幾種換法（各幾枚）？ ? 4．求恰好使 s=1+1/2+1/3+…+1/n 的值大于 10時(shí) n的值。如： 1， 1， 2， 3， 5， 8， 13… 。 ? 1．順序輸出斐波那契數(shù)列 (Fibonacci)的前 30項(xiàng)。所謂“水仙花數(shù)”是指一個(gè)三位數(shù)，其各位數(shù)的立方和等于該數(shù)。問這段臺(tái)階共有多少階。(n!=1 2 3…… n)。 ? 【 算法描述 】 ? （ 1） n=101； ? （ 2） n=n＋ 1，如果 n200則轉(zhuǎn)向步驟（ 7）； ? （ 3）把 INT(SQR(n))賦給變量 k；（判斷素?cái)?shù)的條件：如果數(shù) n不能被 2～SQR(n)之間的任意一個(gè)整數(shù)整除，那么 n就是素?cái)?shù)）） ? （ 4）把內(nèi)層循環(huán)變量 j初值設(shè)為 2，標(biāo)志位 flag設(shè)為 0； ? （ 5） n與 j相除，若能整除，則 n不是素?cái)?shù)，把標(biāo)志位 flag改為 1；否則 j=j＋ 1，循環(huán)執(zhí)行步驟（ 5），直到 j的值超出范圍或者 flag為 1時(shí)，結(jié)束內(nèi)層循環(huán)； ? （ 6）如果 flag為 0，則輸出 n； ? （ 7）結(jié)束。 ? 【 算法描述 】 ? （ 1）讓變量 j從 1到 4做循環(huán)，執(zhí)行以下步驟； ? （ 2）累加量 s賦值為 0； ? （ 3）讀入一個(gè)數(shù)據(jù) x； ? （ 4）判斷 x是否為 0，若為 0則打印 s； ? （ 5）判斷 x是否在 30～ 50之間，是則 s=s＋ 1，否則轉(zhuǎn)向步驟 (3)； ? （ 6）結(jié)束。 ? 【 學(xué)習(xí)任務(wù) 5】 某單位共有四個(gè)部門，各部門的人數(shù)不同，但都不超過 20人。前面介紹的三種循環(huán)都允許嵌套使用，也允許互相嵌套使用。 ? 【 程序清單 】 ? INPUT max ? IF max=0 THEN END ? DO ? INPUT k ? IF kmax THEN max=k ? IF k=0 THEN PRINT max ： END ? LOOP ? 【 想一想 】 以學(xué)習(xí)任務(wù) 4為例，說明在用 DOLOOP語句的編程過程中應(yīng)該注意哪些問題？ 第四節(jié) 環(huán)環(huán)相扣 ——循環(huán)嵌套 應(yīng) 知 應(yīng) 會(huì) ? １ .掌握循環(huán)嵌套的結(jié)構(gòu)及其使用方法； ? ２ .理解算法（如窮舉法）的基本概念，并能用于解決實(shí)際問題。當(dāng)輸入值是0時(shí)結(jié)束輸入。 ? 語句的格式如下： ? DO ? 循環(huán)體 ? LOOP ? 作用：反復(fù)執(zhí)行循環(huán)體。 ? 國民經(jīng)濟(jì)總產(chǎn)值的年增長率為 8%，幾年后國民經(jīng)濟(jì)總產(chǎn)值翻兩番？ ? 【 程序清單 】 ? p=100 ? r= ? WHILE p200 ? p=p* (1+r) ? n=n+1 ? WEND ? PRINT n；＂ years＂ ? END ? 【 想一想 】 WHILE后的條件可否改成“ p=200‖? ? 【 練一練 】 從 1開始，累加自然數(shù)，求使和第一次超過 200的那個(gè)加數(shù)是多少？ 第三節(jié) 大浪淘沙 ——DO－ LOOP語句 應(yīng) 知 應(yīng) 會(huì) ? DO－ LOOP循環(huán)的格式、功能和使用要點(diǎn)； ? 2．明確 DOLOOP語句與 WHILEWEND語句、 FORNEXT語句的異同及其各自的適用范圍。以上過程反復(fù)進(jìn)行到某一次條件為“假”； ? 3．如果條件為“假”，則不執(zhí)行 WHILE與 WEND之間的語句，直接跳到 WEND出口，脫離循環(huán)，接著執(zhí)行 WEND之后的語句。 ? 語句的格式如下： ? WHILE 條件表達(dá)式 ? 循環(huán)體 ? WEND ? 作用：當(dāng)條件表達(dá)式的值為真時(shí)執(zhí)行循環(huán)體。國民經(jīng)濟(jì)總產(chǎn)值的年增長率為 8%，幾年后國民經(jīng)濟(jì)總產(chǎn)值翻兩番？每年的有規(guī)律的增長是個(gè)循環(huán)過程，你能否試著用我們剛剛學(xué)過的循環(huán)結(jié)構(gòu) FORNEXT語句試著實(shí)現(xiàn)一下呢？ ? 你在設(shè)計(jì)程序的過程中，是否發(fā)現(xiàn)一個(gè)有點(diǎn)棘手的問題？就是我們很難準(zhǔn)確地預(yù)測(cè)到應(yīng)執(zhí)行多少次循環(huán)，終值難以確定？學(xué)習(xí)一下 WHILEWEND語句吧，你一定會(huì)對(duì)這個(gè)問題找到更好的解決辦法。 ? 編程打印如下兩個(gè)圖形： ? （ 1） * * * * * ? * * * * * ? * * * * * ? * * * * * ? （ 2） * ? * * ? * * * ? * * * * 第二節(jié) 小小統(tǒng)計(jì)員 ——WHILE－ WEND語句 應(yīng) 知 應(yīng) 會(huì) ? WHILEWEND循環(huán)的格式、功能和使用要點(diǎn)； ? WHILEWEND語句與 FORNEXT語句的異同及其各自的適用范圍。 ? 【 知識(shí)拓展 】 ? exit for 語句：提前終止循環(huán) ? 【 實(shí)例 】 ? for i=1 to 100 s = s + i * i if s = 100 then exit for next i print s end ? 練習(xí)： ? 求 1到 100之間的所有偶數(shù)之和。 ? FOR x=2 TO 10 STEP 0 ? PRINT x ? NEXT x ? 5．終止循環(huán)的條件是“循環(huán)變量的值超過終值”，而不是“循環(huán)變量的值等于終值”， 循環(huán)次數(shù)的計(jì)算可以通過公式計(jì)算： ? 循環(huán)次數(shù) =INT(（循環(huán)終值 循環(huán)初值） /步長 )+1； ? 循環(huán)變量的作用主要是用來對(duì)循環(huán)進(jìn)行控制，根據(jù)它的值決定何時(shí)終止循環(huán)過程。如果步長為 1，則“ STEP‖可以省略；當(dāng)步長為零時(shí)，循環(huán)永不終止，成為“死循環(huán)”。它們可以是整數(shù)或小數(shù)。 ? 【 算法描述 】 ? （ 1）輸入數(shù)據(jù) n； ? （ 2）給累乘積 s賦初值 1； ? （ 3）從 1到 n循環(huán)累乘； ? （ 4）輸出 s； ? （ 5）結(jié)束。 n!=1 2 3…… n（ n10）。像 s這種實(shí)現(xiàn)累加功能的變量我們通常稱之為“累加器”。 ? 【 想一想 】 求 1到 100的和，循環(huán)初值、終值分別應(yīng)該是多少？ ? 加數(shù)的變化和步長有何關(guān)系，如何控制步長？ ? 【 學(xué)習(xí)任務(wù) 1】 求 1+2+3……+100 。 ? 【 注意 】 1．當(dāng)步長為 1時(shí)，可以省略 STEP部分。 ? NEXT語句 是“循環(huán) 終端語句 ”，它的作用是 標(biāo)志循環(huán) 結(jié)構(gòu)的 范圍 。 FOR語句實(shí)質(zhì)上是一種計(jì)數(shù)循環(huán)，循環(huán)次數(shù)由循環(huán)變量的初值、終值、步長值共同決定。 ? 【 建議課時(shí) 】 ? 4課時(shí) ——FOR－ NEXT語句 應(yīng) 知 應(yīng) 會(huì) ? ； ? 、初值、終值、步長等概念； ? FORNEXT循環(huán)的格式、功能和使用要點(diǎn)。 ? 【 學(xué)習(xí)評(píng)價(jià)建議 】 ? 通過練習(xí)、作業(yè)或小測(cè)驗(yàn)的方式來檢驗(yàn)學(xué)生對(duì)循環(huán)結(jié)構(gòu)使用和掌握情況。 ? 【 學(xué)習(xí)資源 】 ? QBASIC環(huán)境 ? 【 學(xué)習(xí)過程 】 ? 首先是教師講解循環(huán)程序設(shè)計(jì)的基本語句，并通過實(shí)例分析和演示各種循環(huán)語句的不同的使用方法和使用范圍，讓學(xué)生了解幾種循環(huán)語句的不同點(diǎn)和使用技巧，在教師的幫助下，完成本單元實(shí)例程序的編寫和調(diào)試，完成對(duì)循環(huán)結(jié)構(gòu)的學(xué)習(xí)。請(qǐng)編寫計(jì)算運(yùn)費(fèi)的程序，其中貨車行駛的距離從鍵盤輸入。例如： a＝ 2， b＝ 16，則 c＝ 216；若 a＝ 18， b＝ 476，則 c＝ 18476。其中： b最大不超過 999， a不大于 31。 ? 4．輸入三個(gè)數(shù)，按由大到小順序打印出來。請(qǐng)您編一程序，幫小 Q制訂出一種買筆的方案。已知商店里有三種鋼筆，它們的單價(jià)分別為 6元、 5元和 4元。 ? 3歲以下 兒童服裝、玩具、識(shí)圖卡片 ? 3~12歲 服裝、故事畫報(bào)、益智玩具 ? 13~18歲 學(xué)習(xí)軟件、青少年讀物 ? 20~29歲 香檳酒、箴言、現(xiàn)金 ? 30~49歲 書籍 ? 50歲以上 鮮花 ? 給定一個(gè)正整數(shù) N，判斷它是否能同時(shí)被 7整除，并輸出以下信息之一： ? （ 1）能同時(shí)被 7整除； ? （ 2）能被其中兩個(gè)數(shù)整除（說明是哪兩個(gè)數(shù)）； ? （ 3）只能被其中一個(gè)數(shù)整除（說明是哪一個(gè)數(shù)）； ? （ 4）不能被 7中任何一個(gè)數(shù)整除。 ? 【 程序清單 】 ? INPUT ＂購物款：＂； p ? SELECT CASE p ? CASE IS300 ? c=p ? CASE IS=500 ? c=p* ? CASE IS=1000 ? c=p* ? CASE IS=3000 ? c=p* ? CASE ELSE ? c=p* ? END SELECT ? PRINT ＂應(yīng)付金額為：＂； c ? END 【 注意 】 當(dāng) CASE語句中的CASE子句后表達(dá)式是一個(gè)范圍，而非一系列常量時(shí)，用CASE IS作為保留字。編程輸入購物款，計(jì)算出實(shí)際應(yīng)付金額。 不是