【導(dǎo)讀】面對(duì)計(jì)算機(jī)，我們仿佛在和另外一個(gè)智慧體。答案很簡(jiǎn)單——就如同我們?nèi)祟?。的交流一樣——用語言告訴它。1．程序設(shè)計(jì)語言的分類及分類依據(jù)；2．了解各種語言的優(yōu)缺點(diǎn)，能夠根據(jù)需要選擇合適的語言類型；5．掌握QBASIC語句的格式；6．了解程序的基本編寫規(guī)則。主要是通過教師的講解，使學(xué)生了解程序的發(fā)展和使用情況，以及編寫程序的一般規(guī)則，通過。一個(gè)簡(jiǎn)單的實(shí)例，演示程序的執(zhí)行過程。通過學(xué)生書寫的書面材料，檢查學(xué)生對(duì)程序的認(rèn)識(shí)和興趣情況，提高學(xué)習(xí)興趣。低級(jí)語言和高級(jí)語言兩大類。匯編語言和機(jī)器語言都是針對(duì)特定的計(jì)算機(jī)系統(tǒng)。用計(jì)算機(jī)處理問題時(shí)，必須告訴它明確的處理步。指令的序列就叫程序。過程被稱為程序設(shè)計(jì)。設(shè)邊長(zhǎng)為L(zhǎng)；面積為S。1．程序由若干程序行組成，以回車符作為行結(jié)束符。通過練習(xí)、作業(yè)或小測(cè)驗(yàn)的方式來檢驗(yàn)學(xué)生對(duì)所學(xué)程序語句的掌握情況。語句定義符決定了語句的功能，語句體說明了語句的具體內(nèi)容。

　　

【正文】 —DO－ LOOP語句 應(yīng) 知 應(yīng) 會(huì) ? DO－ LOOP循環(huán)的格式、功能和使用要點(diǎn)； ? 2．明確 DOLOOP語句與 WHILEWEND語句、 FORNEXT語句的異同及其各自的適用范圍。 ? 在 QBASIC語言中，除了允許 WHILEWEND、FORNEXT結(jié)構(gòu)外，還增加了 DO循環(huán)結(jié)構(gòu)，使循環(huán)結(jié)構(gòu)的編程更容易，更靈活。 ? 語句的格式如下： ? DO ? 循環(huán)體 ? LOOP ? 作用：反復(fù)執(zhí)行循環(huán)體。 ? 注意： 終止循環(huán)可用 “exit do” ? 【 學(xué)習(xí)任務(wù)４ 】 從鍵盤輸入若干整數(shù)，找出其中的最大值。當(dāng)輸入值是0時(shí)結(jié)束輸入。 ? 【 算法描述 】 ? （ 1）輸入第一個(gè)整數(shù) max； ? （ 2）判斷 max是否為零，若為零則結(jié)束； ? （ 3）輸入下一個(gè)整數(shù) k； ? （ 4）若 kmax，將 k賦給 max； ? （ 5）當(dāng) k值不為 0時(shí)，轉(zhuǎn)向 (3)； ? （ 6）輸出最大值 max； ? （ 7）結(jié)束。 ? 【 程序清單 】 ? 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í)際問題。 ? 在一個(gè)循環(huán)體中又完整地包含另一個(gè)循環(huán)稱為循環(huán)嵌套。前面介紹的三種循環(huán)都允許嵌套使用，也允許互相嵌套使用。在設(shè)計(jì)程序解決實(shí)際問題時(shí)，循環(huán)嵌套的使用極為廣泛。 ? 【 學(xué)習(xí)任務(wù) 5】 某單位共有四個(gè)部門，各部門的人數(shù)不同，但都不超過 20人?，F(xiàn)進(jìn)行勞資調(diào)查，統(tǒng)計(jì)各部門年齡在 30到 50歲之間的人數(shù) (包括 30歲和 50歲 )。 ? 【 算法描述 】 ? （ 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é)束。 ? 【 程序清單 】 ? FOR j=1 TO 4 ? s=0 ? FOR k=1 TO 20 ? READ x ? IF x=0 THEN PRINT ＂部門＂； j；＂年齡在 30～ 50歲之間的人數(shù)為＂； s；＂人＂ ? IF FIX(x)=30 AND INT(x)=50 THEN s=s＋ 1 ? NEXT k ? NEXT j ? DATA 28， 34， 26， 47， ， 0 ? DATA 19， ， 27， 45， 48， 0 ? DATA 24， 24， 37， ， 53， 0 ? DATA 39， 4， ,48， 0 ? END ? 【 學(xué)習(xí)任務(wù)６ 】 找出 100～ 200之間的全部素?cái)?shù)（如果一個(gè)數(shù)的約數(shù)只有 1和它本身，那么這個(gè)數(shù)就被稱為素?cái)?shù)）。 ? 【 算法描述 】 ? （ 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é)束。 ? 【 程序清單 】 ? FOR n=101 TO 200 STEP 2 ? k=INT(SQR(n)) ? j=2 ? flag=0 ? WHILE j=k AND flag=0 ? IF n MOD j =0 THEN flag=1 ELSE j=j＋ 1 ? WEND ? IF flag=0 THEN PRINT n, ? NEXT n ? END ? 【 練一練 】 ? 1．求 n!的值小于 5000時(shí)的最大 n值。(n!=1 2 3…… n)。 ? 2．有一段臺(tái)階，若每步上 2階，最后余 1階；每步上 3階，最后余 2階；每步上 5階，最后余 4階；每步上 6階，最后余 5階；每步上 7階，恰好上完。問這段臺(tái)階共有多少階。 ? 3．編寫程序，輸出所有的“水仙花數(shù)”。所謂“水仙花數(shù)”是指一個(gè)三位數(shù)，其各位數(shù)的立方和等于該數(shù)。如： 153=13＋ 53＋ 33。 ? 1．順序輸出斐波那契數(shù)列 (Fibonacci)的前 30項(xiàng)。 Fibonacci數(shù)列的變化規(guī)律是：第一項(xiàng)和第二項(xiàng)都是 ? 1，從第三項(xiàng)起，每項(xiàng)的值都是前兩項(xiàng)的和。如： 1， 1， 2， 3， 5， 8， 13… 。 ? 2．甲、乙、丙三艦同時(shí)開始放禮炮，各放 21響，甲艦每隔 3分鐘放一次，乙艦每隔 5分鐘放一次，丙艦每隔 7分鐘放一次。假設(shè)發(fā)射時(shí)刻絕對(duì)準(zhǔn)確，問能聽到多少聲禮炮聲？ ? 3．用一張一元票換 1分、 2分和 5分的硬幣，每種至少一枚，問有哪幾種換法（各幾枚）？ ? 4．求恰好使 s=1+1/2+1/3+…+1/n 的值大于 10時(shí) n的值。 ? 5．一個(gè)炊事員上街采購(gòu) ,用 500元錢買了 90只雞 , 其中母雞一只 15元 ,公雞一只 10元 ,小雞一只 5元 ,正好把錢買完。問母雞、公雞、小雞各買多少只？ 6．求 1!+2!+…+10! 的值。 ? 7．編寫一程序，驗(yàn)證角谷猜想。所謂的角谷猜想是：對(duì)于任意大于 1的自然數(shù) n，若 n為奇數(shù)，則將 n變?yōu)?3*n+1，否則將n變?yōu)?n的一半。經(jīng)過若干次這樣的變換，一定會(huì)使 n變?yōu)?1。 ? 8．求兩個(gè)正整數(shù) m和 n的最大公約數(shù)。 9．一個(gè)兩位數(shù) x，將它的個(gè)位數(shù)字與十位數(shù)字對(duì)調(diào)后得到一個(gè)新數(shù) y，此時(shí) y比 x大 36，請(qǐng)編程求出所有這樣的兩位數(shù)。 ? 10．有一個(gè)三位數(shù)，它的各位數(shù)字之和的 11倍恰好等于它自身，請(qǐng)編程求出這個(gè)三位數(shù)。 ? 11．編程打印出如下圖案： ? 1 ? 121 ? 12321 ? 1234321 ? 123454321 ? 12．猜價(jià)格：中央電視臺(tái)的“幸運(yùn) 52‖欄目深受觀眾喜愛，其中的“猜商品價(jià)格”的節(jié)目更是膾炙人口，現(xiàn)在請(qǐng)你編一個(gè)程序模擬這一游戲：由計(jì)算機(jī)隨機(jī)產(chǎn)生 200至 5000之間的一個(gè)整數(shù)，作為某件商品的價(jià)格，然后由你去猜是多少，若你猜的數(shù)大了，則計(jì)算機(jī)輸出提示“ Gao‖，若你猜的數(shù)小了，則計(jì)算機(jī)輸出提示“ Di‖，然后你根據(jù)提示繼續(xù)猜，直到你猜對(duì)了，計(jì)算機(jī)會(huì)提示“ Ok‖，并統(tǒng)計(jì)你猜的總次數(shù)。 ? 13．出售金魚者決定將缸里的金魚全部賣出。第一次賣出全部金魚的一半加二分之一條 。第二次賣出剩余的三分之一加三分之一條金魚 。第三次賣出余下金魚的四分之一加四分之一條 。第四次賣出余下的五分之一加五分之一條金魚。還剩下 11條金魚。當(dāng)然 ,出售金魚時(shí)都是整數(shù)條 ,不能有任何破損。求缸里原有的金魚數(shù) ? 第五章 各就各位 —數(shù)組 ? 【 學(xué)習(xí)目標(biāo) 】 ? 1．理解數(shù)組的概念及用途； ? 2．掌握數(shù)組的定義及用法； ? 3．熟練掌握數(shù)組的特點(diǎn)及使用方法； ? 4．靈活運(yùn)用數(shù)組知識(shí)解決實(shí)際問題； ? 5．掌握數(shù)組的定義及使用方法； ? 6．靈活運(yùn)用二維數(shù)組的知識(shí)解決實(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)的掌握。 ? 【 學(xué)習(xí)成果 】 ? 編寫教材中給定的實(shí)例程序，并上機(jī)編寫、調(diào)試通過。 ? 【 學(xué)習(xí)評(píng)價(jià)建議 】 ? 通過練習(xí)、作業(yè)或小測(cè)驗(yàn)的方式來檢驗(yàn)學(xué)生對(duì)數(shù)組的理解和在程序編寫中使用技巧的掌握情況。 ? 【 基礎(chǔ)知識(shí)與技能 】 ? 1．?dāng)?shù)組的概念及用途； ? 2．掌握數(shù)組的特點(diǎn)及使用方法； ? 3．運(yùn)用數(shù)組知識(shí)解決實(shí)際問題； ? 4．二維數(shù)組的定義及使用方法； ? 運(yùn)用二維數(shù)組的知識(shí)解決實(shí)際問題。 ? 【 建議課時(shí) 】 ? 5課時(shí) 第一節(jié) 整裝待發(fā) ——認(rèn)識(shí)數(shù)組 應(yīng) 知 應(yīng) 會(huì) ? １ .理解數(shù)組的概念及用途； ? ２ .掌握數(shù)組的定義及用法。 ? 數(shù)組就是有著內(nèi)在聯(lián)系和相同性質(zhì)的數(shù)據(jù)，可以把它們按一定順序組織起來，共用一個(gè)統(tǒng)一的名字來代表的一組數(shù)據(jù)，這個(gè)名字就是數(shù)組名。數(shù)組中的各個(gè)數(shù)據(jù)用帶下標(biāo)的數(shù)組名來區(qū)分，并規(guī)定將下標(biāo)用括號(hào)括起來。例如： S(20)，其中“ S‖是數(shù)組名，“ 20‖是下標(biāo)， S(20)是數(shù)組 S的一個(gè)元素。 ? 在程序中使用數(shù)組應(yīng)遵循“先定義后使用”的原則。定義一個(gè)數(shù)組用“數(shù)組說明語句”來實(shí)現(xiàn)。 ? 數(shù)組的定義： ? 格式： DIM 數(shù)組名 (最大下標(biāo) ) ? 作用：說明數(shù)組的維數(shù)和數(shù)組元素的個(gè)數(shù)。只有一個(gè)下標(biāo)的數(shù)組稱為一維數(shù)組，當(dāng)我們定義了一個(gè)數(shù)組之后，程序中用到的數(shù)組下標(biāo)不能超過所定義的最大下標(biāo)。有兩個(gè)下標(biāo)的數(shù)組稱為二維數(shù)組，有 n個(gè)下標(biāo)的數(shù)組稱為 n維數(shù)組。 ? 比如建立一個(gè)一維的最大下標(biāo)為 5的數(shù)組 A： ? DIM A(5) ? 【 學(xué)習(xí)任務(wù) 1】 從鍵盤輸入 10個(gè)數(shù)，把它們按反序輸出。 ? 【 算法描述 】 ? （ 1）定義數(shù)組 a； ? （ 2）把 10個(gè)數(shù)分別輸入 a(1)， a(2)， …a(10) 中； ? （ 3）輸出 a(10)， a(9)， …a(1) 的值； ? （ 4）結(jié)束。 ? 【 程序清單 】 ? DIM a(10) ? FOR j=1 TO 10 ? INPUT a(j) ? NEXT j ? PRINT ? FOR j=10 TO 1 STEP － 1 ? PRINT a(j) ? NEXT j ? END ? 【 想一想 】 上機(jī)試一試，將數(shù)組定義改為 DIM a(8)，重新運(yùn)行程序，將會(huì)出現(xiàn)什么現(xiàn)象？為什么？ ? 【 練一練 】 ? 有一個(gè)已按由小到大規(guī)律排好序的數(shù)組，現(xiàn)在從鍵盤任意輸入一個(gè)數(shù)，把它插入到該數(shù)組中，要求插入完成后，該數(shù)組仍然由小到大的排序方式。 第二節(jié) 一字排開 ——一維數(shù)組 應(yīng) 知 應(yīng) 會(huì) ? １ .熟練掌握數(shù)組的特點(diǎn)及使用方； ? ２ .靈活運(yùn)用數(shù)組知識(shí)解決實(shí)際問題。 ? 隨著學(xué)習(xí)的深入，所要處理的數(shù)據(jù)可能會(huì)增多，對(duì)數(shù)據(jù)的處理也會(huì)起來越復(fù)雜，越來越綜合，利用數(shù)組可以解決較大批量的數(shù)據(jù)處理和訪問的問題。下面我們將會(huì)看到，數(shù)組的使用給數(shù)據(jù)的輸入和查找等處理帶來的方便。 ? 【 學(xué)習(xí)任務(wù) 2】 利用隨機(jī)函數(shù)產(chǎn)生 n個(gè) 10～ 99之間的整數(shù)并將它們存放在數(shù)組中，然后輸入一個(gè)要查找的數(shù) k，若 k存在，則輸出它在數(shù)組中的位置；否則輸出“沒找到”信息。 ? 【 算法描述 】 ? （ 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é)束。 ? 【 程序清單 】 ? INPUT ＂請(qǐng)輸入一個(gè)正整數(shù)：＂； n ? DIM x(n) ? FOR j=1 TO n ? x(j)=FIX(RND*90)＋ 10 ? NEXT j ? INPUT ＂請(qǐng)輸入待查找的數(shù)：＂； k ? j=1 ? WHILE x