信息技術(shù)期中考試試卷及答案-算法與程序設(shè)計

（算法與程序設(shè)計模塊）試卷說明：試卷滿分100分，考試時間60分鐘

一、選擇題（本大題共25個小題，每題2分，共50分）1．計算機解決問題的三個步驟中不包括下面哪一步驟……()（A）需求分析 （B）問題反思 （C）算法分析 （D）用計算機編寫程序2．對于一個完整的算法的流程圖，下列說法不正確的是…………………()（A）有而且只有一對 框 （B）不一定有 框（C）不一定有 框 （D）分支結(jié)構(gòu)中一定有 框3．下列算法展示了一臺自動售貨機一次售貨的工作流程：步驟1：提示“請投幣”步驟2：若硬幣面值不是0.1元、0.5元、1元，退回硬幣，并跳回步驟1步驟3：若投入貨款達1.5元或以上，執(zhí)行步驟4，否則執(zhí)行步驟1步驟4：售出一個口香糖步驟5：從接收貨款中減去1.5元步驟6：退回余額下列關(guān)于這個算法說法正確的是……………（）（A）上述算法采用偽代碼表示（B）這臺自動售貨機在任何情況下也不會售出口香糖（C）上述算法包含有順序結(jié)構(gòu)（D）這臺自動售貨機只會在接受硬幣達2元時才放出口香糖4．下列關(guān)于類、對象、屬性、事件的描述中，錯誤的是……()（A）同一類對象具有同一類屬性，但同一個屬性可以有不同的屬性值（B）“PrivateSubCommand_Click()”中的“Click”屬于事件（C）VB編程界面中，雙擊窗體中某對象，出現(xiàn)的是代碼窗口（D）對象的屬性值在程序運行過程中不可修改5．VB語句Text1.Text="Text"用于在文本框中顯示字符串，該語句中的“Text1”是……（（A）屬性值 （B）對象名 （C）屬性名 （D）類名6．小張用VB做了一個小游戲，他想把自己做的程序放在因特網(wǎng)上供他人下載使用，他應(yīng)該將自己做的程序保存為什么格式供他人下載………………()（A）Frm （B）Exe （C）Swf （D）Vbp7．下列變量命名正確的是（A）IsTrue （B）Next （C） A-3 （D）3Str8．一個摸球游戲的流程圖如右圖所示(紅球總數(shù)和綠球總數(shù)均大于0)。游戲結(jié)束時，S位所代表的是………………………()（A）摸到的綠球數(shù) （B）摸到的紅球數(shù) （C）未摸到的綠球數(shù) （D）未摸到的紅球數(shù)第8題圖S=1S=1ForK=1to6step2ForJ=5to12Step3 S=S*KNextJNextKPrintS第9題圖9．有如下一段VB程序段，當(dāng)該程序結(jié)束后，程序中的代碼“S=S*K”共被執(zhí)行了多少次()（A）6 （B）8 （C）9 （D）1210．以下變量定義錯誤的是（A）定義一個變量存放客戶姓名：DimNameasString（B）定義一個變量存放客戶性別：DimAddrasBoolean（C）定義一個變量存放客戶電話：DimTelasString（D）定義一個變量存放QQ號碼：DimQQasInteger11．Dimarr(1to10,11to20)asinteger該指令定義了多少個數(shù)組元素（A）10 （B）20 （C）100 （D）20012．如果x=4，那么以下運算結(jié)果為True的表達式是………()（A）x<=4andx>=6 （B）x>4Orx>=6

（C）x<4orx>6

（D）notx<>413．已知整型變量X的值為-3，則VB表達式Int(x/2)的值是………………()（A）-2 （B）0 （C）-1 （D）214．下列VB函數(shù)中，與Val函數(shù)作用相反的是……………()（A）Len

（B）Abs

（C）Str

（D）Asc15．在VB中，設(shè)X=7146，能得到其十位上數(shù)字4的正確表達式是………()（A）x\10mod100（B）x\10mod10 （C）x\100mod10 （D）xmod10\1016．VB標準函數(shù)Rnd函數(shù)的作用是返回一個大于等于0且小于1的隨機實數(shù)，只產(chǎn)生大于等于10且小于100隨機整數(shù)的VB表達式是…………………()（A）Int(Rnd*100) （B）Int(Rnd*90+10)（C）Int(Rnd*99+1) （D）Int(Rnd*99+10)17．觀察如下VB程序設(shè)計界面，選出下面說法錯誤的一項………………()（A）該界面中共有3個標簽對象，屬于標簽類。（B）該界面中的命令按鈕的Caption屬性被設(shè)置為了“計算”。（C）該VB程序保存時，有關(guān)窗口界面的信息被保存在“.Frm”文件中。（D）該界面中共有4個文本框?qū)ο?，它們的Text屬性值在當(dāng)前狀態(tài)下一樣。第17題圖Subcommand1_click()Subcommand1_click()DimsasintegerDimcasintegerDimkasinteger=1\*GB3①s=0:c=0:k=1Dowhile=2\*GB3②k<=3=3\*GB3③‘循環(huán)開始If=4\*GB3④s=3then=5\*GB3⑤s=s*2=6\*GB3⑥s=s+k=7\*GB3⑦k=k+1=8\*GB3⑧c=c+1LoopPrints,cEndsub第18-19題圖18．讀右邊程序，程序中一共標明了8條語句，下列說法錯誤的是……()（A）=1\*GB3①=5\*GB3⑤賦值語句，=2\*GB3②=4\*GB3④不是賦值語句（B）=3\*GB3③是注釋語句，對程序運行不產(chǎn)生影響（C）=6\*GB3⑥描述的是累加器，=7\*GB3⑦描述的是計數(shù)器（D）程序中包含了賦值語句、選擇語句、循環(huán)語句和注釋語句19．右邊程序中，最后輸出s和c的值分別是：………………()（A）6,4 （B）6,3 （C）9,4 （D）9,320．以下是一個事件處理過程，這個過程的名稱為……()SubC1_DblClick()Print"*"EndSub（A）C1（B）C1_DblClick（C）print（D）DblClick21．下列問題適合用解析算法求解的是……………………（）（A）尋找一堆彩球中所有的紅球（B）計算一個球從100米高的樓頂?shù)粝聛淼穆涞厮俣龋–）將全班同學(xué)按身高從低到高排隊（D）從電子詞庫中找到Infomation這個單詞22．如果一個自然數(shù)恰好等于它的因子之和，稱這個數(shù)為“完數(shù)”，如：6=1+2+3。某算法能找出1000以內(nèi)所有的完數(shù)，那么這個算法主要用到的方法是（A）枚舉 （B）解析 （C）排序 （D）查找23．VB中常常需要用戶自己來定義函數(shù)，下列屬于定義函數(shù)的語句是…()（A）Dim函數(shù)名as類型名（B）Function函數(shù)名as類型名（C）Const函數(shù)名=數(shù)值（D）Dim函數(shù)名（a1toa2）as數(shù)據(jù)類型24．小明買了6個蘋果，這6個蘋果的重量（單位：兩）分別為8.1、3.4、9.5、2.2、1.2、5.6，若采用選擇排序算法對其進行從小到大排序，則需要進行數(shù)據(jù)互換的次數(shù)是…（）（A）2 （B）3 （C）4 （D）525．五位評委給歌手打分的成績依次為93，85，92，84，90，原始數(shù)據(jù)9385928490第一趟8493859290第二趟第三趟8485909392第四趟8485909293若采用冒泡排序算法對其進行從小到大排序，則第二趟的排序結(jié)果是（A）8490859392（B）8493859092（C）8485939092（D）8490928593二、VB表達式書寫與求值（本大題共5個小題，每題2分，共10分）26．sqr(25)+len(“abc”)的返回值是__________________________。27．Mid(“2009烏鎮(zhèn)歡迎你!”,5,2)的返回值是__________________。28．把數(shù)學(xué)中的式子，轉(zhuǎn)化為VB中的表達式__________________________。29．寫出數(shù)學(xué)表達式并且的VB表達式_____________________________。30．求下列VB表達式9\2+1Mod2+Int（-11/3）的值____________________。

三、讀程序（本大題共7個小題，每題2分，共14分）31.有如下VisualBasic程序段：PrivateSubCommand1_Click()DimmAsstring,tAsintegerm="Love"t=1314Label1.Caption=m+str(t)Endsub該程序段運行后，在標簽Label1上顯示的是____________。32.有如下VisualBasic程序段：PrivateSubCommand1_Click()DimaAsstring,bAsstringDimcAsLonga="123"b="456"Ifa<>bThenc=val(a+b)Elsec=val(a)+val(b)EndIfPrintcEndsub該程序段運行后，c的值是____________。33．有如下VisualBasic程序段：x=1Fori=5To12Step2x=x+iNexti該程序段運行后，x的值是____________。34.有如下VisualBasic程序段：s=0:i=1DoWhiles<10s=s+ii=i+2Loop該程序段運行后，s的值是____________。35.有如下VisualBasic程序段：x=3Fori=3To6Ifx<15Thenx=x*iElsex=x+iEndIfNexti該程序段運行后，x的值是____________。36．如下程序運行后輸出的結(jié)果為：___________________。Privatesubtest36()Dimiasinteger,jasintegerDimsasintegerFori=1to20Forj=15to2step-2S=i*jNextjNextiPrintsEndsub37．如下程序運行后，輸出結(jié)果為_________。Privatesubtest()DimiasIntegerDimArr(1to10)asintegerFori=1to10Arr(i)=i*iNextiPrintArr(8)EndSub四、程序填空或改錯（本大題共5題，每空2分，共26分）38．有如下程序，缺少一變量定義語句，請補充完整：（注：輸出的結(jié)果為250000）PrivateSubTestDimaasInteger‘定義變量sumSum=0Fora=1to1000step2Sum=Sum+aNextaPrintSumEndSub39.一個酵母細胞每一分鐘分裂為2個，在下一分鐘，就有4個細胞，然后，8個、16個、……以此類推。一個酵母細胞，經(jīng)過多少分鐘后數(shù)目超過250個。解決此問題的部分程序如下：Dimnaslong,xaslongn=1:x=2Dowhilex<=100n=n+1x=x^2Loop問：（1）為了實現(xiàn)這一目標，程序劃線處的表達式應(yīng)更正為____________。（2）運行更正后的程序，在經(jīng)過________________分鐘后細胞數(shù)目超過250個。40．如下是計算圓面積的VB界面和所有程序代碼：（1）由VB界面和程序代碼可知，用于輸入圓半徑的文本框?qū)ο竺麨椋篲_______________。（2）為實現(xiàn)圓面積的計算，用戶除了點擊計算按鈕，還可以執(zhí)行的操作有:______________。41．把整數(shù)3025從中剪開分為30和25，將這兩個數(shù)之和平方：（30+25）^2=3025，則其計算結(jié)果又等于原數(shù)。求所有符合這樣條件的四位數(shù)，將下面程序中畫線處填寫完整。（1）__________________________（2）__________________________PrivateSubCommand1_Click()DimnasInteger,aasInteger,xasIntegerDimn1asInteger,n2asIntegerList1.ClearFora=32to99n=a*a(1)n2=nmod100x=n1+n2if(2)thenList1.AddItemStr(n)NextaEndSub42．某地出租車計價方式如下：3公里內(nèi)（包括3公里）起步價10元；超過3公里，但10公里內(nèi)，則3公里內(nèi)收費10元，超出部分每公里2元；如果超過10公里，則10公里內(nèi)收費24元，超出部分每公里3元。其程序?qū)崿F(xiàn)如下：PrivateSubCommand1_Click()x=val(Text1.Text)ifx<=3theny=10if(1)theny=10+(x-3)*2ifx>10theny=(2)ifx<=0theny=0Label1.Caption=xLabel2.Caption=yEndSub請把上面程序補充完整：（1）_______________________（2）________________________43.小明家的院子里有一棵桃子樹，每到秋天樹上都會結(jié)出很多桃子。今天小明共摘到了10個桃子，并稱出了這十個桃子的重量，現(xiàn)在，他想找出第K重的桃子的重量。程序運行時界面如第44題-1圖所示，列表框list1中顯示十個桃子的重量，Text1中輸入K的值，Text2中顯示第K重的桃子的重量。第44題-1圖（1）設(shè)計第44題-1圖所示應(yīng)用程序界面時，應(yīng)在第44題-2圖所示的“屬性窗口”中，將窗體Form1的__________________屬性設(shè)置為“尋找第K重的桃子”；為添加列表框List1，應(yīng)使用第44題-3圖所示的“控件工具箱”中的______________（填寫相應(yīng)編號）。第44題-2圖SHAPE第44題-3圖（2）“開始尋找”按鈕單擊事件處理過程的代碼如下所示。為實現(xiàn)算法功能，請將下列程序補充完整。（1）___________________（2）___________________PrivateSubCommand2_Click()k=val(text1.text)Fori=1To9Forj=10Toi+1Step-1If（1）Thent=d(j):d(j)=d(j-1):d(j-1)=tEndIfNextjNextiText2.Text=（2）EndSub學(xué)校_____________班級___________學(xué)號______________準考證號___________________☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆桐鄉(xiāng)一中信息技術(shù)期中考試參考答案學(xué)校_____________班級___________學(xué)號______________準考證號___________________☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆（算法與程序設(shè)計模塊）選擇題（本大題共25個小題，每題2分，共50分）12345678910BCCDBBABCD11121314151617181920CDACBBACDB2122232425BABCCVB表達式書寫與求值（本大題共5個小題，每題2分，共10分）