2.3.1從制作矩形框問題開始_第1頁
2.3.1從制作矩形框問題開始_第2頁
2.3.1從制作矩形框問題開始_第3頁
2.3.1從制作矩形框問題開始_第4頁
2.3.1從制作矩形框問題開始_第5頁
已閱讀5頁,還剩3頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)

文檔簡介

1、程序的選擇結(jié)構(gòu),-從制作矩形框問題開始,張軍找來了一條長度為L的鐵絲,希望用來制作 一個面積為S的矩形框。他問李明:這個矩形的長和 寬應(yīng)當(dāng)各是多少,才能使制作出來的矩形框面積為 指定的值呢?,問題導(dǎo)入,自主學(xué)習(xí),(1)分析問題。 設(shè)所求矩形的寬為x,根據(jù)題目的條件,矩形的周長是L,那么它的長與寬的和就是L/2,長應(yīng)為L/2-X。根據(jù)矩形的面積公式,則可以列出如下的方程: x*(L/2-x)=S 化簡這個方程得 x2-2*L*x+S=0 為一元次方這時通過求根公式即可得出解答.,合作探究,(2)設(shè)計算法。 根據(jù)上述的分析,我們可以寫出解決問題的算法如下 輸入鐵絲的長度L; 輸入矩形的面積S 計算

2、判別式D=L*L/4-4*S; 如果D=0,則計算X1=(L/2+sqr(D)/2和X2=(L/2-sqr(D)/2,并輸出X1和X2,否則輸出“找不到這樣的矩形” 結(jié)束。,合作探究,(3)編寫程序。 根據(jù)設(shè)計好的算法,可以寫出制作矩形框問題的程序代碼如下: Private Sub Command 1 Click() L=Inputbox(“請輸入鐵絲的長度:”) S= Input Box(請輸入矩形的面積:) D=L*L/4-4*S If D=0 then X1=(L/2+sqr(D)/2 x2=(L/2-sqr(D)/2 Print“這個矩形的長和寬分別為:”;X1;” 和”;X2 Else Print “找不到這樣的矩形” End If End sub (4)調(diào)試程序。 把程序2-4輸入計算機,按F5運行程序,歸納總結(jié),條件語句的格式 If 條件 Then 語句組1 E1se 語句組2 或 If 條件 Then 語句組1 Else 語句組2 End If,注意事項,條件語句的執(zhí)行過程 當(dāng)條件成立時,執(zhí)行Then后面的語句組1,否則 執(zhí)行語句組2。 在條件語句的基本格式中有時可以省略Else和語句組2,這時條件語句的執(zhí)行過程是當(dāng)條件成立時,執(zhí)行Then后面的語句組1

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論