


下載本文檔
版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
2009年6月高中信息技術(shù)會(huì)考算法與程序設(shè)計(jì)題(第五套)四、程序設(shè)計(jì)題(本題有4小題,第1-3小題,每小題4分,第4小題6分,共18分)1.有如下VisualBasic程序段:a=18:b=12c=(a-b)*2該程序段運(yùn)行后,變量c的值為_(kāi)___________。2.有如下VisualBasic程序段:x=10Ifx>10ThenLabel1.Caption="你可以繼續(xù)使用"ElseLabel1.Caption="余額不足"EndIf該程序段運(yùn)行后,在標(biāo)簽Label1上顯示的是____________。3.有如下VisualBasic程序段:PrivateSubCommand1_Click()DimiAsInteger,xAsInteger,sAsIntegerx=10s=0i=0DoWhilei<=xi=i+2s=s+iLoopEndSub問(wèn):(1)該程序段運(yùn)行后,變量s的值為_(kāi)___________。(2)循環(huán)剛退出時(shí),變量i的值為_(kāi)___________。4.超市進(jìn)貨時(shí)會(huì)將每個(gè)商品的條形碼和價(jià)格輸入計(jì)算機(jī),并對(duì)所有商品按照條形碼排序(從小到大),顧客付款時(shí)只要把條形碼輸入電腦,電腦即可根據(jù)條形碼找到該商品并顯示對(duì)應(yīng)的價(jià)格。下列程序的功能是根據(jù)條形碼查找對(duì)應(yīng)商品的價(jià)格,所有商品的條形碼和價(jià)格分別保存在數(shù)組a和b中(并且已經(jīng)按照條形碼從小到大排序),第i個(gè)商品的條形碼保存在a(i)中,對(duì)應(yīng)的價(jià)格保存在b(i)中,變量f是標(biāo)志變量,如果值為T(mén)rue則說(shuō)明找到了商品,若為False則說(shuō)明沒(méi)有找到。程序界面如圖VB-1所示,在文本框Text1中輸入商品的條形碼,單擊“開(kāi)始查找”按鈕(Command1)后,對(duì)應(yīng)商品的價(jià)格在標(biāo)簽Label4中顯示出來(lái),如果未找到則顯示“找不到該商品,請(qǐng)重新輸入條形碼”。解決此問(wèn)題的算法流程圖如圖VB-2所示,相應(yīng)的程序如下,在程序=1\*GB3①和=2\*GB3②劃線(xiàn)處填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式,將程序補(bǔ)充完整。PrivateSubCommand1_Click()DimxAsString,iAsInteger,jAsInteger,mAsIntegerDimfAsBooleanx=Text1.Texti=1:j=n:f=False'n保存總的商品數(shù)DoWhile(i<=j)AndNot(f)m=Fix((i+j)/2)If=1\*GB3①Thenf=TrueElseIfx<a(m)Then=2\*GB3②Elsei=m+1EndIfLoopIffThenLabel4.Caption=b(m)ElseLabel4.Caption="找不到該商品,請(qǐng)重新輸入條形碼"EndIfEndSub程序中①劃線(xiàn)處應(yīng)填入___________________程序中②劃線(xiàn)處應(yīng)填入___________________圖VB-1開(kāi)始開(kāi)始結(jié)束輸入條形碼保存到x輸出查找失敗信息i←1,j←n,f←Falsei≤j并且f=False?m←Fix((i+j)/2)找到商品?x<a(m)?將查找區(qū)間右邊界設(shè)為中點(diǎn)的前一個(gè)位
溫馨提示
- 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ì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 高校安全警示教育課件
- 新疆生產(chǎn)建設(shè)兵團(tuán)興新職業(yè)技術(shù)學(xué)院《環(huán)境工程基礎(chǔ)實(shí)驗(yàn)》2023-2024學(xué)年第二學(xué)期期末試卷
- 南京旅游職業(yè)學(xué)院《香料化學(xué)》2023-2024學(xué)年第二學(xué)期期末試卷
- 日照市嵐山區(qū)2025屆數(shù)學(xué)五下期末聯(lián)考模擬試題含答案
- 內(nèi)蒙古自治區(qū)烏海市第三中學(xué)2025屆初三3月份月考試卷數(shù)學(xué)試題含解析
- 吉林省松原市高中2025屆高三第四次模擬物理試題含解析
- 江蘇省百校大聯(lián)考2024-2025學(xué)年高考?xì)v史試題原創(chuàng)模擬卷(八)含解析
- 柳州職業(yè)技術(shù)學(xué)院《柔力球》2023-2024學(xué)年第一學(xué)期期末試卷
- 西京學(xué)院《植物學(xué)實(shí)驗(yàn)》2023-2024學(xué)年第一學(xué)期期末試卷
- 通遼市重點(diǎn)中學(xué)2024-2025學(xué)年初三下學(xué)期實(shí)驗(yàn)班第二次月考數(shù)學(xué)試題含解析
- 七下9《木蘭詩(shī)》一輪復(fù)習(xí)檢測(cè)小卷(附答案)
- 綜采工作面乳化液泵檢修工技能理論考試題庫(kù)150題(含答案)
- 26 跨學(xué)科實(shí)踐“制作能升空的飛機(jī)模型”(教學(xué)設(shè)計(jì))2024-2025學(xué)年初中物理項(xiàng)目化課程案例
- 數(shù)控刀片合金知識(shí)
- 2025屆上海市(春秋考)高考英語(yǔ)考綱詞匯對(duì)照表清單
- 內(nèi)蒙古赤峰市松山區(qū)2023-2024學(xué)年八年級(jí)下學(xué)期期中考試數(shù)學(xué)試卷(含答案)
- 大型設(shè)備吊裝地基處理方案
- 2025年公開(kāi)招聘衛(wèi)生系統(tǒng)工作人員歷年管理單位筆試遴選500模擬題附帶答案詳解
- 智能垃圾桶產(chǎn)品介紹
- 2025深圳勞動(dòng)合同下載
- 建筑工地住房安全協(xié)議書(shū)(2篇)
評(píng)論
0/150
提交評(píng)論