多重選擇語句(1)_第1頁
多重選擇語句(1)_第2頁
多重選擇語句(1)_第3頁
多重選擇語句(1)_第4頁
多重選擇語句(1)_第5頁
已閱讀5頁,還剩9頁未讀 繼續(xù)免費閱讀

下載本文檔

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

文檔簡介

1、.1 如何對一個地區(qū)居民生活水平 狀況進行評價?.2n 59%n 59%為貧困;為貧困;50% n 59%50% n 59%為溫飽;為溫飽; 40% n 40% n 50%50%為小康;為小康;30% n 30% n 40%40%為富裕;為富裕;n n 低于低于 30%30%為最富裕。為最富裕。恩格爾系數(shù)n=人均食品支出總額人均食品支出總額人均個人消費支出總額人均個人消費支出總額100%100%.3 根據(jù)某地居民家庭抽樣調(diào)查的有關資料,已知該地區(qū)居民人均食品支出總額x和人均個人消費總額y,請你編寫一個程序,求恩格爾系數(shù),并根據(jù)聯(lián)合國糧農(nóng)組織提出的標準,判斷該地區(qū)居民生活水平狀況。.4Priva

2、te sub command1_click() x=inputbox(“請輸入人均食品支出總額”,”輸入”) y=inputbox(“請輸入人均個人消費支出總額”,”輸入”) n=x/y print “恩格爾系數(shù)n=”;n End sub if n0.59 then print “該地區(qū)居民生活處于貧困水平” if n=0.5 and n=0.4 and n=0.3 and n0.4 then print “該地區(qū)居民生活處于富裕水平” if n0.59 then print “該地區(qū)居民生活處于貧困水平” if n=0.5 and n=0.4 and n=0.3 and n0.4 then

3、print “該地區(qū)居民生活處于富裕水平” if n5950 to 5940 to 4930 to 39elseselect case case print “該地區(qū)居民生活處于貧困水平” case print “該地區(qū)居民生活處于溫飽水平” case print “該地區(qū)居民生活處于小康水平” case print “該地區(qū)居民生活處于富裕水平” case print “該地區(qū)居民生活處于最富裕水平” End select .11練習2:我們把鍵盤上的字符作如下分類: 大寫字母:AZ 小寫字母:az 數(shù) 字:09 其他字符編寫一個程序,根據(jù)上述的分類,輸入一個字符,報告該字符所屬的類型。.1

4、2Private Sub command1_click() End SubSelect Case Zf case “A” to “Z” print Zf;”是大寫字母” case “a” to “z” print Zf;”是小寫字母” case “0” to “9” print Zf;”是數(shù)字” case else print Zf;”是其他字符” End SelectDim Zf As stringZf =Inputbox(“請輸入字符”,”輸入”).13練習3:同學們都喜歡知道自己的星座,請編寫一個程序以實現(xiàn):每輸入一個生日日期,就進入一個對應星座。水瓶 1.20-2.18雙魚 2.19-3.20白羊 3.21-4.19金牛 4.20-5.20雙子 5.21-6.21巨蟹 6.22-7.22獅子 7.23-8.22處女 8.23-9.22天枰 9.23-10.23天蝎 10.2

溫馨提示

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

評論

0/150

提交評論