版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
多重選擇語(yǔ)句
前面我們已經(jīng)學(xué)習(xí)了利用條件語(yǔ)句來(lái)解決兩種情況的判斷和選擇問(wèn)題。但在現(xiàn)實(shí)生活中一定會(huì)遇到多于兩種選擇的多種選擇,如書(shū)中P44《居民生活水平狀況的評(píng)價(jià)》就是多于兩種選擇的判斷。設(shè)所求的恩格爾系數(shù)為N,由于已知?jiǎng)Ⅺ惣亦l(xiāng)人均食品支出總額和人均個(gè)人消費(fèi)支出總額,根據(jù)計(jì)算公式可求出恩格爾系數(shù)。所以解決這一問(wèn)題的關(guān)鍵是判斷求出的恩格爾系數(shù)N屬于哪一個(gè)區(qū)間就可輸出評(píng)價(jià)結(jié)果。分析問(wèn)題:1、輸入人均食品支出總額X和人均個(gè)人消費(fèi)支出總額Y。2、求n=x/y*100%,并輸出n的值。3、如果n>59%,則輸出“該地區(qū)居民生活處于貧困水平!”。4、如果50%<=n<=59%,則輸出“該地區(qū)居民生活處于溫飽水平!”。5、如果40%<=n<50%,則輸出“該地區(qū)居民生活處于小康水平!”。6、如果30%<=n<40%,則輸出“該地區(qū)居民生活處于富裕水平!”。7、如果n<30%,則輸出“該地區(qū)居民生活處于最富裕水平!”。8、結(jié)束。設(shè)計(jì)算法:PrivateSubCommand1_Click()x=InputBox(“請(qǐng)輸入人均食品支出總額:”,”輸入窗口”)y=InputBox(“請(qǐng)輸入人均個(gè)人消費(fèi)支出總額:”,”輸入窗口”)
n=x/yPrint“恩格爾系數(shù)n=”;n編寫(xiě)程序:Ifn>0.59ThenPrint“該地區(qū)居民生活處于貧困水平!”
Ifn>=0.5Andn<=0.59ThenPrint“該地區(qū)居民生活處于溫飽水平!”
Ifn>=0.4Andn<0.5ThenPrint“該地區(qū)居民生活處于小康水平!”
Ifn>=0.3Andn<0.4ThenPrint“該地區(qū)居民生活處于富裕水平!”
Ifn<0.3ThenPrint“該地區(qū)居民生活處于最富裕水平!”EndSub編寫(xiě)程序:SelectCase表達(dá)式
Case表達(dá)式列表1
語(yǔ)句組1
Case表達(dá)式列表2
語(yǔ)句組2
Case
表達(dá)式列表……
語(yǔ)句組……
CaseElse
語(yǔ)句組N+1EndSelect多重選擇語(yǔ)句的格式PrivateSubCommand2_Click()DimxAsSingle,yAsSingle,nAsSinglex=InputBox("請(qǐng)輸入人均食品支出總額:","輸入窗口")y=InputBox("請(qǐng)輸入人均個(gè)人消費(fèi)支出總額:","輸入窗口")n=x/yClsPrint"恩格爾系數(shù)n=";nPrint"該地區(qū)居民生活處于貧困水平!"編寫(xiě)程序:Case50To59Print"該地區(qū)居民生活處于溫飽水平!"Case40To49Print"該地區(qū)居民生活處于小康水平!“Case30To39Print"該地區(qū)居民生活處于
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 中國(guó)老年人口失能狀況及變化分析
- 人臉識(shí)別的智能防疫系統(tǒng)設(shè)計(jì)
- 會(huì)計(jì)職業(yè)生涯規(guī)劃
- Unit3 Listening 說(shuō)課稿2024-2025學(xué)年外研版七年級(jí)英語(yǔ)上冊(cè)
- 山東省聊城市陽(yáng)谷縣四校2024-2025學(xué)年七年級(jí)上學(xué)期1月期末水平調(diào)研道德與法治試題(含答案)
- 二零二五年度城市停車(chē)場(chǎng)施工廉政管理服務(wù)合同3篇
- 貴州商學(xué)院《軟裝設(shè)計(jì)》2023-2024學(xué)年第一學(xué)期期末試卷
- 信息技術(shù)《使用掃描儀》說(shuō)課稿
- 2025版家庭親子教育圖書(shū)訂閱服務(wù)合同范本3篇
- 二零二五年度家族企業(yè)股東股權(quán)繼承轉(zhuǎn)讓協(xié)議3篇
- 食堂項(xiàng)目經(jīng)理培訓(xùn)
- 安全經(jīng)理述職報(bào)告
- 福建省泉州市2023-2024學(xué)年高一上學(xué)期期末質(zhì)檢英語(yǔ)試題 附答案
- 建筑項(xiàng)目經(jīng)理招聘面試題與參考回答(某大型集團(tuán)公司)2024年
- 安保服務(wù)評(píng)分標(biāo)準(zhǔn)
- (高清版)DB34∕T 1337-2020 棉田全程安全除草技術(shù)規(guī)程
- 部編版小學(xué)語(yǔ)文二年級(jí)上冊(cè)單元測(cè)試卷含答案(全冊(cè))
- 護(hù)理部年終總結(jié)
- 部編版三年級(jí)上冊(cè)語(yǔ)文語(yǔ)文期末質(zhì)量監(jiān)測(cè)(含答題卡)
- KISSSOFT操作與齒輪設(shè)計(jì)培訓(xùn)教程
- 2024年第二季度粵港澳大灣區(qū)經(jīng)濟(jì)分析報(bào)告-PHBS
評(píng)論
0/150
提交評(píng)論