【正文】 =Key ，找到了。思考：如果要找的是52?i,j,mid分別是多少？這也說明當(dāng)i=j的時候是查找的最后可能次數(shù)，這也是終止查找的一個關(guān)鍵條件。教學(xué)步驟三：繼續(xù)分解對分查找算法中包含的其他情況。畫一畫：請仿照上面的畫法,分別畫出key=17和key=20的查找示意圖。（2） 第二種情況：要找的值在前半部分；以查找鍵KEY=17為例分析：結(jié)果分析：第一次比較后：j=mid1第二次比較后：i=mid+1第三次比較后：找到了（3）第三種情況：要找的值找不到；以查找鍵KEY=20為例分析：結(jié)果分析：第一次比較后：j=mid1第二次比較后：i=mid+1第三次比較后：i=mid+1第四次比較：i=j 但是d(mid)≠key,所以找不到。教學(xué)步驟四：對各種情況進行歸納總結(jié)。（1）Key與d(mid)的大小比較影響i,j的取值的規(guī)律：i的取值規(guī)律：if d(mid)key then i=mid+1j的取值規(guī)律：if d(mid)key then j=mid1用分支結(jié)構(gòu)實現(xiàn)。(2)繼續(xù)進行重復(fù)查找的條件： i≤j，用循環(huán)結(jié)構(gòu)實現(xiàn)。教學(xué)步驟五：構(gòu)建對分查找的流程圖教學(xué)步驟六：對分查找算法的初步程序?qū)崿F(xiàn)。教師事先設(shè)計好Vb窗體，學(xué)生只需要在相應(yīng)的程序體輸入代表算法思想的關(guān)鍵語句。附主要程序體：Private Sub Command2_Click() Dim key As Integer, mid As Integer, i As Integer, j As Integer key = Val() i = 1: j = 10Do While i = j mid = (i + j) \ 2 If d(mid) = key Then = 找到了，是第 amp。 mid amp。 個 Exit Sub End If If d(mid) key Then i = mid + 1 Else j = mid 1 End IfLoop = 找不到End Sub程序說明：獲得要查找的數(shù)據(jù)key的值 key = Val()i,j賦初值。 i = 1: j = 10求mid的值。mid = (i + j) \ 2分三種情況，（1）如果key=d(mid),則如果 d(mid) = key 那么 = 找到了，在第 + Str(mid) + 個。（2）如果keyd(mid),那么i=mid+1 否則 j=mid+1重復(fù)上述的3,4步，直到i超出j(或者理解為i=j不成立，所以不能用for next,而要用do while語句）如果有找到key,那執(zhí)行第4步（1）步后應(yīng)該輸出找到的位置后退出程序，如果不退出，說明key沒有找到，所以在相應(yīng)位置要輸出“找不到”。教學(xué)步驟七：評價。評價學(xué)生的程序?qū)崿F(xiàn)情況，并討論或?qū)嵺`問題：如果是降序序列，該怎么樣改動程序？如果序列元素不是10個，而是100個或更多呢？教學(xué)步驟八：總結(jié)提升。（1）由于對分查找過程中的每次比較都能使得搜索空間減半，對分查找將不會使用超過log2n次比較來找到目標(biāo)值。（2）提升對分查找算法的實際意義：同學(xué)們可能還沒有意識到二分查找是多么高效，那不妨設(shè)想一下在一個包含一百萬個人名的電話簿中找一個名字，二分查找可以讓你不超過21次就能找到指定的名字。如果你能夠?qū)⑹澜缟纤械娜税凑招彰判?，那么你可以?5步以內(nèi)找到任何人。第四節(jié) 遞歸法一、教材分析　　“遞歸算法與遞歸程序”是廣東教育出版社《算法與程序設(shè)計》選修1第四單元第五節(jié)的內(nèi)容，前面學(xué)習(xí)了用解析法解決問題、窮舉法解決問題、在數(shù)組中查找數(shù)據(jù)、對數(shù)進行排序，且在第二章中學(xué)習(xí)了自定義過程與函數(shù)。在前面學(xué)習(xí)的基礎(chǔ)上，學(xué)習(xí)遞歸算法的程序?qū)崿F(xiàn)是自定義函數(shù)的具體應(yīng)用，在培養(yǎng)學(xué)生“自頂向下”、“逐步求精”的意識起著重要的作用。二、教學(xué)重點與難點　　重點：理解什么是遞歸算法　　難點：學(xué)生用遞歸算法的思想分析問題三、　教學(xué)過程進程教師活動學(xué)生活動設(shè)計意圖創(chuàng)設(shè)情境課堂導(dǎo)入：師：今天我們先做一個小的智力題目有4個人排成一隊，問最后一個人的身高時，他說比第3個人高2厘米；問第3個人的身高時，他說比第2個人高2厘米；問第2個人的身高時，他說比第1個人高2厘米；最后問第1個人的身高，他說是170厘米，請問：第4個人的身高是多少？學(xué)生：176厘米師：如何得出的呢？結(jié)論：H4=H3+2=（H2+2）+2=（（H1+2）+2）+2Hn=H(n1)+2H1=176厘米H4 176=H3+2 H3 174 =H2+2H2 172 =H1+2H1=170師生共同活動找出遞變規(guī)律并將算法描述使用情境教學(xué)法在此活動過程中能讓學(xué)生初步從活動中體驗“問題的發(fā)與收”從而走進了遞歸的思維模式，為進一步學(xué)習(xí)遞歸算法埋下伏筆學(xué)習(xí)新知任務(wù)1上臺階: 10級臺階每次可上1級或2級，有多少種上法?基本情況描述1級臺階 1 1種2級臺階 1+1 ，2 2種3級臺階 1+1+1，1+2，2+1 3種…… …… ……10級臺階 ？分析：如何使問題簡單化，若對第一步進行分析，則有兩種情況：假設(shè)第一步上1級，則余n1級。假設(shè)第一步上2級，則余n2級。設(shè)Sn 為n級的上法，則有：Sn=Sn1+Sn2 （n=3） 遞推S1, S2 ,……=? 返回1 2 3 4 5 6 7 8 9 101 2 3 5 8 13 21 34 55 89任務(wù)2算法描述（由學(xué)生完成）評價與展示：評價與展示學(xué)生任務(wù)，最后展示參考流程圖與偽代碼拓展1若10級臺階每次可上1級或2級或3級，又有多少種上法?基本情況描述1級臺階 1 1種2級臺階 1+1 ，2 2種3級臺階 1+1+1，1+2，2+1，3 4種…… …… ……討論、比較、分析、歸納用數(shù)據(jù)方法推導(dǎo)解決過程，建立解決問題的數(shù)學(xué)模型（建模）實例教學(xué)。選擇“上臺階”這一實際問題。該問題使用常規(guī)方法（通常用枚舉方法）分析與解決較為復(fù)雜，但使用遞歸方法，問題可以輕松解決，從使得重點難點得以輕松的突破。課堂小結(jié)我們今天所學(xué)習(xí)的算法是“遞歸算法”，我們談?wù)勈裁词沁f歸算法，遞歸算法有什么特點。師生討論，共同小結(jié)：遞歸算法是數(shù)值層層調(diào)用實現(xiàn)的，當(dāng)達到最底層后，再將值層層向上返回。(遞下去，收回來，簡稱：遞歸)必須有個遞歸結(jié)束條件（有個該收回來的條件確定的值）鞏固和發(fā)展本節(jié)課的學(xué)習(xí)內(nèi)容。拓展資源主題網(wǎng)站第4章 面向?qū)ο蟪绦蛟O(shè)計初步第一節(jié) 初識面向?qū)ο蟪绦蛟O(shè)計思想源程序分析Private Sub Form_click()Dim i As Integer, n As IntegerDim StName As StringDim sc1 As IntegerDim sc2 As IntegerDim sc3 As IntegerDim total As SingleDim prompt As Stringn = Val(InputBox(輸入學(xué)生數(shù)))Print 姓名 amp。 vbTab amp。 成績1 amp。 vbTab amp。 成績2 amp。 vbTab amp。 成績3 amp。 vbTab amp。 加權(quán)總分 amp。 vbTab amp。 證書類型For i = 1 To nStName = InputBox(輸入第 amp。 i amp。 位同學(xué)的姓名)sc1 = Val(InputBox(輸入該同學(xué)的軟硬件基礎(chǔ)成績))sc2 = Val(InputBox(輸入該同學(xué)的文字處理技巧成績))sc3 = Val(InputBox(輸入該同學(xué)的網(wǎng)絡(luò)技術(shù)應(yīng)用成績)) total = sc1 * + sc2 * + sc3 * prompt = StName amp。 vbTab amp。 Str(sc1) amp。 vbTab amp。 Str(sc2) amp。 vbTab amp。 Str(sc3) amp。 vbTab amp。 Str(total) amp。 vbTabIf (sc1 = 85 And sc2 = 85 And sc3 = 85) Then Print prompt amp。 優(yōu)秀Else If (total 70 And sc1 = 60 And sc2 = 60 And sc3 = 60) Then Print prompt amp。 合格 Else Print prompt amp。 不合格 End IfEnd IfNext iEnd Sub39。輸出表頭Dim stu As New StudentDim n As IntegerPrivate Sub Command1_Click()Dim StuRec As StringDim StName As StringDim sc1 As IntegerDim sc2 As IntegerDim sc3 As IntegerStName = sc1 = Val()sc2 = Val()sc3 = Val()Call (StName, sc1, sc2, sc3)StuRec = () amp。 vbTabStuRec = StuRec amp。 (1) amp。 vbTab amp。 (2) amp。 vbTab amp。 (3)StuRec = StuRec amp。 vbTab amp。 () amp。 vbTab amp。 () StuRecn = n + 1 = n + 1TxtName = TxtScore1 = 0: TxtScore2 = 0: TxtScore3 = 0End SubPrivate Sub Form_Load() = 1End Sub39。按“處理”按鈕事件39。將學(xué)生的信息賦給對象39。輸出結(jié)果39。文本框清零39。初始化，并在列表框中輸入表頭對象： 具有唯一可識別的標(biāo)識 具有屬性 具有行為（方法）類：是具有相同操作功能和相同的數(shù)據(jù)格式的對象的集合。第二節(jié) 面向?qū)ο蟪绦蛟O(shè)計一、教學(xué)目標(biāo)：1．理解對象、窗體和控件的概念，掌握建立控件對象的一般步驟，了解對象的命名規(guī)則。2．知道對象的三要素，知道讀取和設(shè)置對象屬性的方法，知道調(diào)用對象方法的格式，知道事件過程的格式。3．了解事件驅(qū)動設(shè)計思想和面向?qū)ο蟮脑O(shè)計方法。二、教學(xué)重點：1．對象、窗體、控件、屬性、方法、事件等基本概念。2．對象三要素及事件驅(qū)動設(shè)計思想。教學(xué)難點：位圖圖像存儲容量的計算三、教學(xué)過程：課程導(dǎo)入：說出所指的窗口的名稱。 請把下列窗口名稱和窗口的功能用線一一對應(yīng)聯(lián)起來。 工具箱窗口 設(shè)置對象的各種屬性 窗體設(shè)計器窗口 管理程序中的各類文件 工程管理器窗口 進行程序界面的設(shè)計 屬性窗口 提供設(shè)計程序界面的工具 代碼窗口 顯示和編輯程序代碼新課講授：前面我們已經(jīng)熟悉了VB的操作界面和VB中窗口的不同功能，而VB又是一種面向?qū)ο蟮某绦蛟O(shè)計語言，那么構(gòu)成一個完整的VB應(yīng)用程序主要是由對象來組成的，而每個不同的對象都有各自的窗口來進行編輯。對象[提問] 什么叫對象、窗體、控件？對象：就是在VB系統(tǒng)中設(shè)計好的窗體（Form）、控件、菜單、打印機、剪貼板和數(shù)據(jù)庫等，而使用最多的對象是窗體和控件。窗體：ＶＢ應(yīng)用程序的基本構(gòu)造模塊，在程序運行時，是人與程序交互操作的窗口?？丶褐赣霉ぞ呦渲械墓ぞ咴诖绑w中畫出的、能實現(xiàn)一定功能的部件。[演示]（１）對象的建立Ａ．建立命令按鈕控件①單擊工具箱中繪制命令按鈕控件的工具。②將指針移到窗體適當(dāng)位置，指針變成十字線，拖動指針畫出一個大小合適的方框。③釋放左鍵。命令按鈕控件就完成。Ｂ．選定命令按鈕控件單擊命令按鈕控件，在控件的四周有８個小方塊，表示為活動控件。C．移動命令按鈕控件先選定，再拖動命令按鈕控件，可改變命令按鈕控件的位置。D．改變命令按鈕控件的大小先選定，再拖動命令按鈕控件四周的小方塊可改變控件的大小?？偨Y(jié)：通過同樣的方法建立標(biāo)簽控件、文本框控件、定時器控件等。［演示練習(xí)1］在窗體上設(shè)計2個命令按鈕、1個文本框控件、1個標(biāo)簽控件和1個定時器控件；并操作任一個控件（選定、移動、改變大小）。（２）對象的命名［提問］為什么要給對象命名？每個對象都要有自己的名字，有了名字才能在程序中引用該對象。在建立對象時，ＶＢ提供缺省名：Command1,Command2,Label1等為了容易理解，最好給對象設(shè)置一個有意義的名字。對象的類型意義前綴