2010學(xué)年第二學(xué)期期中檢測(cè)期中試題卷(高一信息技術(shù)

1、2010學(xué)年第二學(xué)期期中檢測(cè)（2011年4月）高一 信息技術(shù)試題卷考生須知：1、本卷共 10頁(yè)； 2、本卷答案必須做在答案卷上，做在試卷上無效； 3、答題前請(qǐng)?jiān)诖痤}卷密封線內(nèi)填好相關(guān)欄目。不得使用計(jì)算器。一、選擇題（每題2分，30題，共60分）1. 下列關(guān)于算法的描述，正確的是（A）一個(gè)算法的執(zhí)行步驟可以是無限的（B）一個(gè)完整的算法必須有輸出（C）算法只能用流程圖表示（D）一個(gè)完整的算法至少有一個(gè)輸入2. 用計(jì)算機(jī)無法解決打印所有素?cái)?shù)的問題，其原因是解決該問題的算法違背了算法特征中的（A）唯一性 （B）有窮性（C）有0個(gè)或多個(gè)輸入 （D）有輸出3.在Visual Basic中，Hello.vb

2、p文件屬于（A）工程文件 （B）窗體文件 （C）代碼文件 （D）類文件4. 在Visual Basic中，語(yǔ)句Year.Caption = 2010 中的Year是（A）屬性值 （B）屬性名 （C）對(duì)象名 （D）類名5. “和諧號(hào)”列車規(guī)定：旅客可免費(fèi)攜帶20Kg行李，攜帶品的長(zhǎng)、寬、高相加不超過130cm，對(duì)超過規(guī)定的攜帶品，應(yīng)提前辦理托運(yùn)手續(xù)。用算法描述行李能否托運(yùn)的處理過程，合適的算法流程是（A）順序模式 （B）選擇模式 （C）循環(huán)模式 （D）樹型模式6.下列屬于Visual Basic數(shù)值常量的是（A）321 （B）12*3 （C）Abs(-5) （D）Sqr(9)7.在Visual

3、Basic中，如果要給變量i,j,k都賦值為1，則下列語(yǔ)句正確的是（A）i=j=k=1（B）i,j,k=1（C）i=1,j=1,k=1（D）i=1:j=1:k=18.在Visual Basic中，窗體中添加文本框Text1的正確方法是（A）先單擊工具箱中的控件圖標(biāo)，再將鼠標(biāo)指針移到窗體上，雙擊鼠標(biāo)（B）雙擊工具箱中的控件圖標(biāo) （C）先單擊工具箱中的控件圖標(biāo)，再將鼠標(biāo)指針移到窗體上，單擊鼠標(biāo)（D）用鼠標(biāo)左鍵拖動(dòng)工具箱中的控件圖標(biāo)到窗體中9.在Visual Basic中，要定義一個(gè)一維數(shù)組name，用于存儲(chǔ)10位學(xué)生姓名信息，則正確的數(shù)組定義語(yǔ)句是（A）Dim name(1,10) As Inte

4、ger（B）Dim name(1 To 10) As Integer（C）Dim name(1,10) As String（D）Dim name(1 To 10) As String10.在Visual Basic中，表達(dá)式 Abs(-3.5)的值是（A） -3（B） -4（C） 3 （D）3.511. 為找自己第一次上幼兒園時(shí)的照片，小張同學(xué)依次翻開自己的多本相冊(cè)來逐張查找。這種查找方法為（A）無序查找 （B）順序查找 （C）對(duì)分查找 （D）隨機(jī)查找12.在Visual Basic中，要在標(biāo)簽Label2上顯示“注意”，則下列操作正確的是（A）在Text屬性中輸入“注意”（B）在Captio

5、n屬性中輸入“注意”（C）在Font屬性中輸入“注意”（D）在Name屬性中輸入“注意”13. 在Visual Basic中，若x表示能被5整除的正整數(shù)，則下列邏輯表達(dá)式的值一定為真的是（A）x / 5 = 0 （B）x Mod 5 = 0（C）Int(x 5) = 0 （D）5 Mod x = 014. 在校內(nèi)跳蚤市場(chǎng)中，某班準(zhǔn)備的5類商品售出的數(shù)量(單位：件)分別是8，10，4，6，3。采用冒泡排序?qū)ζ溥M(jìn)行排序，若完成第一遍時(shí)的結(jié)果是：3，8，10，4，6，則完成第二遍時(shí)的結(jié)果是（A）3，8，10，4，6 （B）3，4，8，6，10（C）3，4，8，10，6 （D）3，4，6，8，1015

6、. 計(jì)算計(jì)件工資的Visual Basic程序運(yùn)行界面如圖所示，單擊計(jì)算命令按鈕Command1，觸發(fā)的事件處理過程名是 （A）Command1_Click （B）Text1_Click（C）Form_Click （D）Label3_Click16. 報(bào)名參加冬季越野賽跑的某班5位學(xué)生的學(xué)號(hào)是：5，8，11，33，45。利用對(duì)分查找，查找學(xué)號(hào)為33號(hào)學(xué)生的過程中，依次被訪問到的學(xué)號(hào)是（A）5，11，33 （B）8，33（C）11，45，33 （D）11，3317. 在Visual Basic中，a = -100，表達(dá)式360 + Str(a)的值是（A）260 （B）360-100 （C）46

7、0 （D）18.有如下Visual Basic程序段： For j=1 To _ Step 2 t=t*j Next j要使循環(huán)體t=t*j執(zhí)行5次，循環(huán)變量的終值可以是（A）-5 （B）0（C）5 （D）1019.衛(wèi)星沿某星球圓軌道運(yùn)行，軌道半徑是r千米，周期是t秒，根據(jù)這些數(shù)據(jù)估算該星球的質(zhì)量m的步驟有：輸出星球質(zhì)量m pi=3.14159計(jì)算星球質(zhì)量m=4*pi2*r3/(g*t2)輸入軌道半徑r和周期tg=6.67*10-11其正確的順序是（A） （B）（C） （D）20.下列Visual Basic表達(dá)式正確的是（A）v0+a*t （B）a2+2bc （C）2*r（D）1/2g*t2

8、21. 下面流程圖所表示的是根據(jù)居民月用電量a，按階梯遞增電價(jià)計(jì)算相應(yīng)電費(fèi)y的算法，該算法屬于 （A）解析算法 （B）排序算法（C）枚舉算法 （D）對(duì)分算法22.下面程序段是利用For語(yǔ)句給數(shù)組a賦值： For i= 1 To 6 a(i)=i+1Next i該程序段運(yùn)行后數(shù)組元素a(3)的值為（A）2 （B）3（C）4 （D）523. 運(yùn)行如下Visual Basic程序，單擊命令按鈕Command1，出現(xiàn)如圖所示的出錯(cuò)信息。發(fā)生除數(shù)為零錯(cuò)誤時(shí)所執(zhí)行的語(yǔ)句是Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Si

9、ngle a = 2 b = a + 1 c = a / (b - 3) Text1.Text = Str(c) End Sub （A） （B） （C） （D）24.在Visual Basic中，若a=1，b=2，c=5，則下列邏輯表達(dá)式值為真的是 （A）(ab) And (ac) （B）(ba) And (bc)（C）(ab) Or (ac) （D）(ba) Or (bc)25. 某校有5位學(xué)生參加學(xué)生會(huì)主席競(jìng)選，得票數(shù)依次為110，98，3，150，67。使用選擇排序的方法對(duì)得票數(shù)進(jìn)行從大到小排序，需要進(jìn)行數(shù)據(jù)互換的次數(shù)是（A）5 （B）4 （C）3 （D）226.在Visual Basi

10、c中，設(shè)x=4126，能得到其百位上數(shù)字“1”的正確表達(dá)式是（A）x Mod 100 （B）x 100 Mod 10（C）x 100 Mod 100 （D）x 10 Mod 1027.以下程序段是一個(gè)完整的Visual Basic塊If語(yǔ)句，則劃線處的語(yǔ)句應(yīng)該是If a100 Then a=a+1Else a=a-1_（A）End Sub（B）Loop（C）EndIf（D）Else End28.下面程序段是利用For語(yǔ)句給數(shù)組a賦值，使a(1)=2，a(2)=4，a(3)=6，a(100)=200，則劃線處的語(yǔ)句應(yīng)該是For i= 1 To 100 _ Next i（A）a(i)=i+2 （B

11、）a(i)=i*i （C）a(i)=i（D）a(i)=2*i29. 計(jì)算某球隊(duì)平均年齡的部分算法流程圖如圖所示，其中：c用來記錄已輸入球員的人數(shù)，sum用來計(jì)算有效數(shù)據(jù)之和，d用來存儲(chǔ)從鍵盤輸入的球員年齡值，輸入0時(shí)表示輸入結(jié)束。 圖中空白處理框和處應(yīng)填入的是（A） sum sum + d c c + 1（B） sum sum + c c c + 1（C） sum sum + d d d + 1（D） sum sum + c d d + 130. 在Visual Basic中，有如下程序：Private Sub Command1_Click() Dim a As Integer, b As I

12、nteger, c As Integer Dim d As Integer a = Val(Text1.Text): b = Val(Text2.Text): c = Val(Text3.Text) d = max(a, b) + max(b, c) Text4.Text = Str(d)End SubFunction max(x As Integer, y As Integer) As Integer If x y Then max = x Else max = yEnd Function運(yùn)行該程序，在文本框Text1、文本框Text2、文本框Text3中分別輸入2、-5、6后，單擊命令按鈕

13、Command1，文本框Text4中顯示的是（A）-5 （B）2 （C）6 （D）8二、程序計(jì)算題（每題2分，10題，共20分）1.有如下Visual Basic程序段：s=goods=s+luck該程序段運(yùn)行后，變量s的值是_。2.有如下Visual Basic程序段：m = -5n = -2.6s = m + Int(n)該程序段運(yùn)行后，變量s的值為_。3.有如下Visual Basic程序段：Dim x As Single, c As Stringx=Val(Text1.Text)If x12 Then c= PMElse c= AMEnd IfLabel1.Caption=c該程序段運(yùn)

14、行時(shí)，在文本框Text1中輸入15.6，Label1標(biāo)簽上將顯示的是 。4.有如下Visual Basic程序段：a = 30 : b = 20 : c = 5m=aIf b m Then m = bIf c m Then m = c該程序段運(yùn)行后，變量m的值為 。5.有如下Visual Basic程序段：s = 0i = 3Do While s = 10 s = s + i i = i + 3Loop該程序段運(yùn)行后，變量s的值為_。6.有如下Visual Basic程序段： k = 0 For i = 1 To 10 If i Mod 3 = 0 Then k = k + 1 Next i該

15、程序段運(yùn)行后，變量k的值為_。7.下列Visual Basic程序的功能是：計(jì)算表達(dá)式12+42+72+972的值，并在文本框Text1中輸出表達(dá)式的值。為了實(shí)現(xiàn)這一目標(biāo)，程序中For語(yǔ)句劃線處的循環(huán)變量步長(zhǎng)應(yīng)為_。Private Sub Command1_Click()Dim sum As LongDim i As Integersum = 0 For i =1 To 97 Step sum = sum + i*iNext iText1.Text = Str(sum) End Sub8.有如下Visual Basic程序段： s = 0:t=1For i = 1 To 4 t=-t s=s+

16、t*i Next i該程序段運(yùn)行后，變量s的值為_。9.以下Visual Basic程序的功能是： 計(jì)算表達(dá)式1+2+4+8+16+32+1024的值，并在文本框Text1中輸出結(jié)果。為了實(shí)現(xiàn)這一功能，程序中劃線處的語(yǔ)句應(yīng)更正為_。Private Sub Command1_Click()Dim a As Integer, s As Longs = 0a = 1Do While a = 1024 s = s + a a = a + 2LoopText1.Text=Str(s)End Sub10.以下Visual Basic程序的功能是：找出自然數(shù)1-100之間被3整除的數(shù)，并在文本框Text1中

17、輸出這些數(shù)的累加和。為了實(shí)現(xiàn)這一功能，程序中劃線處的語(yǔ)句應(yīng)更正為_。Private Sub Command1_Click()Dim i As Integer, sum As Integersum = 0For i = 1 to 100 If i Mod 3=0 Then sum = sum + 3Next iText1.Text=Str(sum)End Sub三、程序填空（每空4分，5空，共20分）1.有一道趣味題，張老師問李老師:你今年幾歲？你愛人今年幾歲？李老師笑笑說：我年齡的平方與我愛人年齡之和恰好等于1053。而我愛人年齡的平方與我的年齡之和卻等于873。你計(jì)算一下吧！ 設(shè)李老師年齡為

18、x歲，他愛人年齡為y歲，由題意可得x，y滿足的數(shù)學(xué)式為： x2 + y = 1053 x + y2 = 873 解決此問題的流程圖如VB-1所示。根據(jù)流程圖VB-1編寫的Visual Basic程序如下，在(1)和(2)劃線處，填入合適的語(yǔ)句或表達(dá)式，把程序補(bǔ)充完整。Private Sub Command1_Click() Dim x As Integer, y As Long x = 1 y = 1053 - x * x Do While （1） （2） y = 1053 - x * x Loop Text1.Text = Str(x) Text2.Text = Str(y)End Sub程

19、序中劃線處(1)應(yīng)填入 程序中劃線處(2)應(yīng)填入 2. 某超市打折促銷，規(guī)定如下：購(gòu)物未超過500元按原價(jià)支付；購(gòu)物超過500元但未超過1000元，超過500元部分按9折優(yōu)惠計(jì)價(jià)；購(gòu)物超過1000元但未超過1500元，超過1000元部分按8折優(yōu)惠計(jì)價(jià)；購(gòu)物超過1500元但未超過3000元，超過1500元部分按7折優(yōu)惠計(jì)價(jià)；購(gòu)物超過3000元，超過3000元部分按6折優(yōu)惠計(jì)價(jià)。根據(jù)以上規(guī)定，假定購(gòu)物貨款為x元，則實(shí)付金額y為: 程序界面如圖所示，在輸入購(gòu)物金額（單位：元）后的文本框orgtext中輸入購(gòu)物金額（單位：元），單擊實(shí)付金額計(jì)算按鈕（Command1）后，在實(shí)際支付金額（單位：元）為后

20、的文本框cashText中輸出實(shí)付金額。 解決此問題相應(yīng)的Visual Basic程序如下：Private Sub Command1_Click()Dim x As Single, y As Singlex = Val(orgtext.Text) If x = 500 Then y = x ElseIf Then y = 500 + (x - 500) * 0.9 ElseIf x = 1500 Then y = 500 + 500 * 0.9 + (x - 1000) * 0.8 ElseIf x = 3000 Then y = 500 + 500 * 0.9 + 500 * 0.8 + (x - 1500) * 0.7Elsey = 5