word版可編輯-初二信息技術(shù)程序設(shè)計(jì)教案精心整理(參考版)
2025-05-12 22:01本頁(yè)面
【正文】 ”米”三、總結(jié)循環(huán)語(yǔ)句：計(jì)數(shù)循環(huán)語(yǔ)句、條件循環(huán)語(yǔ)句。”次”Print “厚度為”。任務(wù)二：根據(jù)提示完成“紙對(duì)折”程序Let h=Let n=0Do while h8844000 Let h=h*2 Let n=n+1LoopPrint “對(duì)折”。 c End If Next bNext a0 25 754 18 788 11 8112 4 84小結(jié)：計(jì)數(shù)循環(huán)多用于在執(zhí)行循環(huán)之前即可確定循環(huán)次數(shù)的場(chǎng)合。代碼如下：Dim a As IntegerDim b As Integer Dim c As IntegerFor a = 0 To 20 For b = 0 To 33 c = 100 a b If (a + b + c = 100) And (a * 5 + b * 3 + c / 3 = 100) Then Print a。 由程序設(shè)計(jì)實(shí)現(xiàn)不定方程的求解與手工計(jì)算不同。 Next i第二關(guān)：分析程序運(yùn)行結(jié)果For i=6 to 1 step 1 Print i。循環(huán)語(yǔ)句：循環(huán)是由循環(huán)語(yǔ)句來(lái)實(shí)現(xiàn)的，根據(jù)控制循環(huán)的方式，循環(huán)語(yǔ)句可分成技術(shù)循環(huán)與條件循環(huán)。二、新課循環(huán)：在程序中反復(fù)執(zhí)行某程序段成為循環(huán)。學(xué)生闖關(guān)，師生一起檢查完成情況四、課堂小結(jié)第三節(jié) 程序中的循環(huán)一、導(dǎo)入觀察“畫一個(gè)圓”程序，查看代碼，思考如何畫100個(gè)同心圓。你真聰明！” ‘顯示猜對(duì)else ‘否則cc ‘沒(méi)猜對(duì)就調(diào)用cc程序end if ‘結(jié)束if條件語(yǔ)句 public sub cc() 函數(shù)的輸入方法提示 ‘cc程序if ba then ‘如果ba 那么=”你猜得太小了，請(qǐng)?jiān)俨拢 ? ‘顯示猜小了else ‘否則=”你猜得太大了，請(qǐng)?jiān)俨?！? ‘顯示猜大了end if ‘結(jié)束if條件語(yǔ)句end submand2_click()end ‘結(jié)束、運(yùn)行、調(diào)試學(xué)生調(diào)試程序，找出問(wèn)題，解決問(wèn)題三、闖關(guān)游戲第一關(guān)：輸入2個(gè)不相同的數(shù)，比較并顯示較大的數(shù) 第二關(guān)：輸入1個(gè)不等于0的正整數(shù)，如果此數(shù)能被3整除，就顯示“OK！”；否則顯示“NO！”?！盶”amp。通用_聲明 Dim a as integer ‘定義一個(gè)整型變量a Dim b as integer ‘定義一個(gè)整型變量bForm_load()Randomize如果不用這條語(yǔ)句，你會(huì)發(fā)現(xiàn)什么？ ‘初始化隨機(jī)生成器a=int(100*rnd+1) ‘產(chǎn)生1至100范圍正整數(shù)mand1_click（）p=int(rnd*12+1) 參照產(chǎn)生1100范圍正整數(shù)的方法產(chǎn)生112正整數(shù)，學(xué)生思考回答 ‘產(chǎn)生卡通畫圖片序號(hào)112pic=pamp。252。（2）設(shè)置對(duì)象的屬性參照表格學(xué)生自主設(shè)置。（1）打開“csyx”文件夾中的“”工程文件后，窗體上加載了組成“猜數(shù)游戲”程序界面的各個(gè)對(duì)象。a b 或a b2．已知三條邊，邊長(zhǎng)分別為變量a、b、c，判斷這三條邊能否組成三角形。例如：x=60 And y=70,=60 And y=70,由And將兩個(gè)關(guān)系表達(dá)式連接起來(lái)。關(guān)系成立，關(guān)系值為“真”；關(guān)系不成立，邏輯值為“假”任務(wù)一：探究學(xué)習(xí)在下表中，變量a中的值為100，變量b中的值為20，請(qǐng)寫出各關(guān)系表達(dá)式的邏輯值。在VB中，常用的關(guān)系運(yùn)算符如下表所示：關(guān)系運(yùn)算符功能關(guān)系運(yùn)算符功能小于=大于等于=小于等于=等于大于不等于關(guān)系運(yùn)算符兩邊表達(dá)式的數(shù)據(jù)類型應(yīng)該相同。程序如下： Let a = val(InputBox(請(qǐng)輸入第一個(gè)數(shù):)) Let b = val(InputBox(請(qǐng)輸入第二個(gè)數(shù):)) If a b Then Print a Else Print b End If四、總結(jié)條件語(yǔ)句的格式 第二課時(shí) 邏輯運(yùn)算一、復(fù)習(xí)導(dǎo)入提問(wèn)：條件語(yǔ)句的格式?條件語(yǔ)句If后面的“條件”是用關(guān)系表達(dá)式或邏輯表達(dá)式來(lái)描述的。任務(wù)一修改代碼：代碼段1：If n = 1 Then = LoadPicture() = 正面Else = LoadPicture() = 背面End If代碼段2：If n = x Then = 哈，您猜對(duì)了！Else = 哈，您猜錯(cuò)了！End If三、鞏固練習(xí)練習(xí)1：輸入一不等于0的自然數(shù)，如是奇數(shù)就顯示“奇數(shù)”，否則就顯示“偶數(shù)”。在程序中，這種判斷功能是由條件語(yǔ)句來(lái)實(shí)現(xiàn)的。 “\” amp。 “\” amp。二、“猜幣”程序分析程序運(yùn)行“猜幣程序”，在文本框中輸入“1”（猜正面）或“0”（猜背面），再單擊“擲幣”命令按鈕，計(jì)算機(jī)就開始“擲幣”并判斷你是否猜對(duì)。 第2節(jié) 程序中的邏輯判斷（3課時(shí)）【教材內(nèi)容】 1 “猜幣”程序2 條件語(yǔ)句（1課時(shí)）3 邏輯運(yùn)算（1課時(shí)）4 綜合實(shí)例（1課時(shí)）【教學(xué)過(guò)程】第一課時(shí) “猜幣”程序一、導(dǎo)入游戲一：請(qǐng)一學(xué)生拿硬幣投擲，另一學(xué)生猜正背面。因此，以后在教學(xué)中要注意避免教材給學(xué)生帶來(lái)負(fù)面影響。但在教材的所有示例中，無(wú)一使用變量定義。，最好先定義其類型教學(xué)總結(jié)本節(jié)課的學(xué)習(xí)，我們主要復(fù)習(xí)了以下幾點(diǎn)：，特別是Val()函數(shù)。bprint “兩變量中的值得和為：”；a+bEnd SubPrivate Sub mand1_Click（）EndEnd Sub引導(dǎo)學(xué)生保存、調(diào)試、運(yùn)行程序。bx=a:a=b:b=xprint “a:”。進(jìn)入代碼窗口，編寫如下程序：Private Sub form_load() =”交換兩變量中的值”End SubPrivate Sub mand1_Click（）Dim a as integerDim b as integerDim c as integera=inputbox(“請(qǐng)輸入存入a變量中的整數(shù)：”，“輸入數(shù)據(jù)”)b=inputbox(“請(qǐng)輸入存入b變量中的整數(shù)：”，“輸入數(shù)據(jù)”)print “a:”。 設(shè)置對(duì)象屬性 啟動(dòng)VB 添加對(duì)象：文本框、標(biāo)簽、按鈕。學(xué)生讀題、審題，得到解題思路教師活動(dòng)學(xué)生活動(dòng) 探究學(xué)習(xí)二：保存、調(diào)試、運(yùn)行程序。進(jìn)入代碼窗口，編寫如下程序：Private Sub Button1_Click(ByVal sender As Object, ByVal e As ) Handles Dim r1 As Double Dim r2 As Double Dim r As Double r1 = r2 = r = r1 * r2 / (r1 + r2) = rEnd Sub（R1+R2）將變?yōu)?val(R1)+val(R2))。改進(jìn)的方法有兩種，第一種就是事先將RRR聲明為
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號(hào)-1