資源簡介

2009學(xué)年第二學(xué)期六、八、九三校期中考試試題卷
學(xué)科：高一信息技術(shù) 滿分：100分 考試時(shí)間：90分鐘
考生須知：1、本卷共 12 頁；審核：張浩 校對(duì)：陳亮
2、本卷答案必須做在答案卷上，做在試卷上無效；
3、答題前請(qǐng)?jiān)诖痤}卷密封線內(nèi)填好相關(guān)欄目。不得使用計(jì)算器。
一、選擇題（每題1分，60題，共60分）
1．下面關(guān)于算法的描述，正確的是（ ）
A．算法不可以用自然語言表示
B．算法只能用框圖來表示
C．一個(gè)算法必須保證它的執(zhí)行步驟是有限的
D．算法的框圖表示法有0個(gè)或多個(gè)輸入，但只能有一個(gè)輸出
2.在Visual Basic中，表示鼠標(biāo)單擊的事件名是
（A）Click （B）KeyPress （C）Load （D）DblClick
3.在Visual Basic中，zuoye.vbp文件屬于
（A）工程文件 （B）窗體文件 （C）代碼文件 （D）類文件
4.在Visual Basic中，要在標(biāo)簽Label2上顯示“注意”，則下列操作正確的是
（A）在Text屬性中輸入“注意” （B）在Caption屬性中輸入“注意”
（C）在Font屬性中輸入“注意” （D）在Name屬性中輸入“注意”
5.在Visual Basic中，若a、b都是正整數(shù)且關(guān)系表達(dá)式a*b Mod 2=0為真，則下列說法正確的是
（A）a、b一定同時(shí)為奇數(shù) （B）a、b中必有一個(gè)為偶數(shù)
（C）a、b中必有一個(gè)為奇數(shù) （D）a、b一定同時(shí)為偶數(shù)
6、在Visual Basic中，設(shè)x=5678，能得到其十位上數(shù)字“7”的正確表達(dá)式是
（A） x \ 10 Mod 100 （B）x \ 10 Mod 10 （C） x \ 100 Mod 10 （D）x Mod 100
7.在Visual Basic中，若x<>0，則下列邏輯表達(dá)式值一定為真的是
（A）x=0 （B）Not(x>0) （C）Not(x<0) （D）Not(x=0)
8.對(duì)于Visual Basic語句If a=1 Then m=m+1 Else m=m-1，下列說法正確的是
（A）a=1為賦值語句 （B）m=m+1和m=m-1均為關(guān)系表達(dá)式
（C）m=m+1和m=m-1均為賦值語句 （D）m=m+1為關(guān)系表達(dá)式，m=m-1為賦值語句
9、在Visual Basic中，語句st="3.14"中的“3.14”是
（A）字符串常量 （B）數(shù)值常量 （C）邏輯常量 （D）實(shí)數(shù)常量
10、在Visual Basic中，若x、y都是正整數(shù)且關(guān)系表達(dá)式x\y=1為真，則下列關(guān)系表達(dá)式值一定為真的是 （A）x Mod y = 0 （B）x（C）x*y Mod 2 = 0 （D）x>=y And x<2*y
11．有流程圖結(jié)構(gòu)如下，其算法結(jié)構(gòu)屬于
( http: / / www.21cnjy.com / )
（A）順序結(jié)構(gòu)（B）選擇結(jié)構(gòu)（C）分支結(jié)構(gòu)（D）循環(huán)結(jié)構(gòu)
12、以下程序段是一個(gè)完整的Visual Basic塊If語句，則劃線處的語句應(yīng)該是
If a>100 Then
a=a+1
Else
a=a-1
________
（A）End Sub （B）Loop （C）End If （D）Else End
13、不能用算法描述問題“輸出一張所有素?cái)?shù)的清單”，是因?yàn)榻鉀Q該問題的步驟不具有
（A）確定性 （B）有窮性 （C）有效性 （D）有輸出
14.如下圖所示的流程圖：
( http: / / www.21cnjy.com / )
該算法完成的功能是
（A）計(jì)算y=1＋2＋3＋4＋5 （B）計(jì)算y=1×2×3×4×5
（C）計(jì)算y=1＋2＋3＋4 （D）計(jì)算y=1＋3＋5＋7
15、在Visual Basic中，Circle.frm文件屬于
（A）工程文件 （B）窗體文件 （C）代碼文件 （D）類文件
16、在Visual Basic中，語句Command1.Caption="計(jì)算"中的Command1是
（A）屬性名 （B）屬性值 （C）對(duì)象名 （D）類名
17．有23個(gè)蘋果分給甲乙丙丁四個(gè)孩子，每個(gè)孩子最多可得到的蘋果數(shù)依次為9、8、7、6個(gè)，找出所有不同分法的算法是：采用列舉方式，列舉每個(gè)孩子所有可能得到的蘋果數(shù)，對(duì)四人所得蘋果數(shù)總和是否為23進(jìn)行判斷，找出符合要求的各種分法，此算法屬于
（A）枚舉算法 （B）排序算法 （C）遞歸算法 （D）解析算法
18．某數(shù)列前三項(xiàng)分別為：a1 = 2、a2 = 3、a3 = 4，以后每項(xiàng)都滿足:
ai = ai-3 + ai-1 （i>3）
如果用數(shù)組a存儲(chǔ)該數(shù)列的前20項(xiàng)，下面程序段劃線處應(yīng)填入
a(1)=2 : a(2)=3 : a(3)=4
For i=______ To 20
a(i) = a(i - 3) + a(i - 1)
Next i
（A）2 （B）3（C）6 （D）4
19．某超市在晚上7：30－8：30期間，對(duì)于在貨架上已超過2天的帶葉蔬菜，收銀機(jī)自動(dòng)將價(jià)格下降50%。用來描述某種蔬菜是否降價(jià)的處理過程，合適的算法流程是
（A）順序結(jié)構(gòu)（B）選擇結(jié)構(gòu)（C）重復(fù)結(jié)構(gòu)（D）循環(huán)結(jié)構(gòu)
20. 找出滿足各位數(shù)字之和等于5的所有三位數(shù)可采用的算法是
（A）枚舉算法 （B）選擇排序 （C）冒泡排序 （D）解析算法
21．Len(“Friend”)的值是（　　　　）
A．6 B．7 C．8 D．9
22．有流程圖如下所示：
該算法的輸出結(jié)果為 （A）3 （B）5 （C）8 （D）9
23．在Visual Basic中，在文本框Text3中顯示“數(shù)據(jù)太大！”，則下列操作正確的是
（A）將Text3的Width屬性值設(shè)置為“數(shù)據(jù)太大！”
（B）將Text3的BackColor屬性值設(shè)置為“數(shù)據(jù)太大！”
（C）將Text3的Height屬性值設(shè)置為“數(shù)據(jù)太大！”
（D）將Text3的Text屬性值設(shè)置為“數(shù)據(jù)太大！”
24．下列Visual Basic表達(dá)式中，能產(chǎn)生一個(gè)100到999之間（包括100和999）隨機(jī)整數(shù)的是 （A）Rnd() * 999 （B）Rnd() * 600+100
（C）Int(Rnd() * 899) + 100 （D）Int(Rnd() * 900) + 100
25．以下程序段是一個(gè)完整的Visual Basic的For語句，則劃線處的語句應(yīng)該是
For k=1 To 3
s=s+k
（A）Loop （B）End If （C）Next k （D）Step k
26．小明媽媽對(duì)小明說：“柜子里那疊盤子中有一個(gè)盤子中間有一條裂縫，你把它找出來”，小明就從最上面一個(gè)盤子開始，一個(gè)一個(gè)拿下放到旁邊，最終找到那個(gè)有裂縫的盤子。從算法角度看，小明的做法屬于
（A）解析算法 （B）選擇排序 （C）冒泡排序 （D）順序查找
27．下面程序段是利用For語句給數(shù)組a賦值，使a(1)=1，a(2)=3，a(3)=5，…，a(50)=99，則劃線處的語句應(yīng)該是
Dim a(1 to 50) As Integer
For i= 1 To 50
_____________
Next i
（A）a(i)=2*i+1 （B）a(i)=2*(i+1) （C）a(i)=i+2 （D）a(i)=2*i-1
28．在算法執(zhí)行流程中，對(duì)于循環(huán)模式下列說法正確的是（ ）
A．對(duì)某個(gè)情況進(jìn)行判斷，當(dāng)結(jié)果為真時(shí)執(zhí)行步驟一，否則執(zhí)行步驟二
B．對(duì)某個(gè)情況進(jìn)行判斷，當(dāng)結(jié)果為真時(shí)執(zhí)行步驟一，然后再次判斷這個(gè)情況，依次類推直到結(jié)果為假時(shí)結(jié)束。
C．僅用循環(huán)模式就可以用來判斷某個(gè)輸入的數(shù)時(shí)不是正數(shù)
D．循環(huán)模式中可以嵌套選擇模式，而選擇模式中不能嵌套循環(huán)模式
29．以下語句中錯(cuò)誤的是（ ）
A．Const var1=123 B．Dim var2 As String
C．x+y=9 D．Dim d(1 to 500) As Double
30．控制工具箱中的工具 ( http: / / www.21cnjy.com / )是（　　　）
A．文件列表　　 　B．單選按鈕　　 C．圖片框　　 　D．標(biāo)簽
31．能完全正確表示“year是閏年”的邏輯表達(dá)式是 （ ）
A． year mod 4=0 B． year mod 400=0
C．(year mod 400=0) or (year mod 4=0) and (year mod 100<>0)
D．(year mod 400=0) and (year mod 4=0) or (year mod 100<>0)
32．如果x >5，那么y=2x，否則y=x2+1。下面表述正確的語句是（ ）。
A．If x>5 Then y=2x Else y=x2+1 B． If x>5 Then y=x*x+1 Else y=2*x
C．If x>5 Then y=2*x Else y=x*x+1 D． If x<5 Then y=x*x+1 Else y=2*x
33．下列可作為VB變量名的是（ ）
A． 4*D B． A_B C． 4ABC D．A+B
34．用語句 Dim A(－3 To 5) As Integer所定義的數(shù)組的元素個(gè)數(shù)是（ ）
A．6 B．7 C．8 D．9
35．將文本框Text2內(nèi)輸入的字符數(shù)據(jù)“abc”送到字符型變量n中，應(yīng)使用的語句是（ ）
A．n=text B．n=text2.text C．n=val(text2) D．n=val(text2.text)
36、在Visual Basic中，若a=3，b=4，c=-5，則下列邏輯表達(dá)式值為假的是
（A）(a>b) And (b>c) （B）(a>c) And (b>a)
（C）(a>b) Or (b>c) （D）(a>c) Or (b>a)
37、程序段
Input a,b
c = a
a = b
b = c
Print a, b
其控制結(jié)構(gòu)屬于：
（A）順序結(jié)構(gòu) （B）選擇結(jié)構(gòu)
（C）循環(huán)結(jié)構(gòu) （D）重復(fù)結(jié)構(gòu)
38、在Visual Basic中，若要定義變量no用于存儲(chǔ)汽車牌照號(hào)碼，如"浙A·12345"，則正確的定義語句是
（A）Dim no As Integer （B）Dim no As String
（C）Dim no As Single （D）Dim no As Boolean
39、一位顧客購買了青菜x千克、包心菜y千克、大白菜z千克，其中青菜6.16元/千克、包心菜3.56元/千克、大白菜1.56元/千克。計(jì)算該顧客消費(fèi)總價(jià)的算法如下：
①輸入三種蔬菜的重量x，y，z
②用公式計(jì)算總價(jià)s=6.16x+3.56y+1.56z
③輸出變量s
④結(jié)束
上述算法屬于
（A）枚舉算法 （B）排序算法 （C）遞歸算法 （D）解析算法
40、設(shè)a=2,b=3,c=4,d=5,表達(dá)式a>b And c<=d Or 2*a>c 的值是（ ）
（A）True （B）False （C）-1 （D）1
41、數(shù)學(xué)表達(dá)式x2-2|x|+1的Visual Basic表達(dá)式是：
（A）x*x-2*Abs(x)+1 （B）x*x-2Int(x)+1
（C）Sqr(x)-2*Abs(x)+1 （D）x︿2-2*Int(x)+1
42、大型歌唱才藝選秀活動(dòng)花兒朵朵各選手人氣得票數(shù)依次為1201，2120，1009，1987，2009，
原始數(shù)據(jù) 1201 2120 1009 1987 2009
第一趟 2120 1201 1009 1987 2009
第二趟
第三趟 2120 2009 1987 1009 1201
第四趟 2120 2009 1987 1201 1009
若采用選擇排序算法對(duì)其進(jìn)行從大到小排序，則第二趟的排序結(jié)果是
（A）2120 2009 1009 1987 1201 （B）2120 2009 1009 1201 1987
（C）1009 1201 2120 1987 2009 （D）1009 1201 2009 2120 1987
( http: / / www.21cnjy.com / )43、在Visual Basic中，若用變量C表示計(jì)數(shù)器，則計(jì)數(shù)器的表達(dá)式是：
（A）C=0 （B）C=1 （C）C=C+1 （D）C+1=C
44、在Visual Basic窗體中有一個(gè)對(duì)象，該對(duì)象的屬性窗口如左圖，下列說法中正確的是：
（A）CommandBotton為對(duì)象類型
（B）True為屬性名
（C）Font為屬性值
（D）該對(duì)象的寬度值為495
45、下列能實(shí)現(xiàn)求兩個(gè)數(shù)x,y中較小數(shù)（用變量min保存較小數(shù)）的程序個(gè)數(shù)是：
（1）If x <= y Then Min = x Else Min = y
（2）Min = x
If y < Min Then Min = y
（3）If x > y Then
t = x: x = y: y = t
End If
Min = x
（4）If x <= y Then Min = y Else Min = x
（A） 1 （B）2 （C） 3 （D）4
46.下列屬于Visual Basic數(shù)值常量的是
（A）321 （B）12*3 （C）Abs(-5) （D）Sqr(9)
47.在Visual Basic中，要定義一個(gè)一維數(shù)組a，用于存儲(chǔ)10位學(xué)生姓名信息，則正確的數(shù)組定義語句是
（A）Dim a(1,10) As Integer （B）Dim a(1 To 10) As Integer
（C）Dim a(1,10) As String （D）Dim a(1 To 10) As String
48.在Visual Basic中，如果要給變量i,j,k都賦值為1，則下列語句正確的是
（A）i=j=k=1 （B）i,j,k=1 （C）i=1,j=1,k=1 （D）i=1:j=1:k=1
49.有如下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）10
50.在計(jì)算平均重量x時(shí)，結(jié)果中產(chǎn)生了許多位小數(shù)，若需要對(duì)x保留一位小數(shù)，并對(duì)第二位小數(shù)進(jìn)行四舍五入，則下列表達(dá)式中正確的是
（A）Int(x*10+0.5)/10 （B）Int(x*100+0.5)/100
（C）Int(x*10)/10 （D）Int(x+0.5)
51.衛(wèi)星沿某星球圓軌道運(yùn)行，軌道半徑是r千米，周期是t秒，根據(jù)這些數(shù)據(jù)估算該星球的質(zhì)量m的步驟有：
①輸出星球質(zhì)量m
②pi=3.14159
③計(jì)算星球質(zhì)量m=4*pi︿2*r︿3/(g*t︿2)
④輸入軌道半徑r和周期t
⑤g=6.67*10︿-11
其正確的順序是
（A）⑤①②③④ （B）①②③④⑤ （C）④⑤②③① （D）③④②①⑤
52.下面程序段是利用For語句給數(shù)組a賦值：
For i= 1 To 6
a(i)=i+1
Next I 該程序段運(yùn)行后數(shù)組元素a(3)的值為
（A）2 （B）3 （C）4 （D）5
53.在Visual Basic中，表達(dá)式 Abs(-3.5)的值是
（A） -3 （B） -4 （C） 3 （D）3.5
54.在Visual Basic中，若x是大于零的偶數(shù)，則下列關(guān)系表達(dá)式值一定為真的是
（A）x Mod 2 = 1 　　　　 （B）x\2 = 0
（C）x\2 = x/2 （D）Int(x/2) <> x/2
55.在下面Visual Basic程序段中，有語法錯(cuò)誤的語句行是
#01 s=0
#02 For m=1 To 5
#03 s+m=s
#04 Next m
（A） 第#01行 （B） 第#02行 （C） 第#03行 （D） 第#04行
56.在Visual Basic中，設(shè)x=4126，能得到其百位上數(shù)字“1”的正確表達(dá)式是
（A）x Mod 100 （B）x \ 100 Mod 10
（C）x \ 100 Mod 100 （D）x \ 10 Mod 10
57.在足球聯(lián)賽中，有5個(gè)班級(jí)的比賽積分依次為14，11，13，8，9，
原始數(shù)據(jù) 14 11 13 8 9
第一趟 8 14 11 13 9
第二趟
第三趟 8 9 11 14 13
第四趟 8 9 11 13 14
若采用冒泡排序算法對(duì)其進(jìn)行從小到大排序，則第二趟的排序結(jié)果是
（A）8 14 9 11 13 （B）8 9 14 11 13
（C）8 14 9 13 11 （D）8 11 9 14 13
58.下列Visual Basic表達(dá)式正確的是
（A）v0+a*t （B）a2+2bc （C）2π*r （D）1/2g*t︿2
59.下列語句用于計(jì)算s=1+5+9+13+…+37：
①For m=1 To 10 ②Next m ③s=0 ④s=s+4*m-3
正確的順序是
（A）①②③④ （B）①③④② （C）③①④② （D）④③①②
60.有流程圖如下圖所示，其功能是將鍵盤輸入的數(shù)進(jìn)行相加，當(dāng)輸入的數(shù)為0時(shí)輸出它們的和，則圖中虛線部分的內(nèi)容是
( http: / / www.21cnjy.com / )
（A） （B） （C） （D）
( http: / / www.21cnjy.com / ) ( http: / / www.21cnjy.com / ) ( http: / / www.21cnjy.com / ) ( http: / / www.21cnjy.com / )
二、程序計(jì)算題（每題2分，20題，共40分）
1.有如下Visual Basic程序段：
a = 4
b = 3
b = a + b
a = a + b
該程序段運(yùn)行后，變量a的值為 （1） 。
2、有如下Visual Basic程序段：
s1= “Information”
s2=“me”
s3=Mid(s1,3,3)+ “ ”+s2
該程序段運(yùn)行后，s3的值為 （2） 。
3．有如下程序段：
Dim A As String
Dim B As String
Dim C As Sting
A=”456”
B=”123”
C=Val（A+B）
該程序段運(yùn)行后，C的值為 （3）
4.有如下Visual Basic程序段：
k = 0
For i = 1 To 10
If i Mod 3 = 0 Then k = k + 1
Next i
該程序段運(yùn)行后，變量k的值為_____（4）______。
5.有如下Visual Basic程序段：
s = 0
i = 3
Do While s <= 10
s = s + i
i = i + 3
Loop
該程序段運(yùn)行后，變量s的值為___（5）__。
6、有如下Visual Basic程序段：
a = 39
b = 93
c = (a + b) / 2
If a + b > 100 Then py = "不對(duì)，太大了"
If a + b = 100 Then py = "正確"
If a + b < 100 Then py = "不對(duì)，太小了"
Label.Caption = py
該程序段運(yùn)行后，在Label1標(biāo)簽上顯示的是： （6） 。
7、公交車從起點(diǎn)到終點(diǎn)共有5站，從起點(diǎn)出發(fā)，每到一站先下一半乘客，然后上兩位乘客，終點(diǎn)站下車共有5人，小王為了知道起點(diǎn)出發(fā)時(shí)車上的人數(shù)，編寫了如下VB程序：
Private Sub Command1_Click()
Dim n As Integer, i As Integer
n = 5
For i = 1 To 4
n = (n - 2) * 2
Next i
text1.Text = Str(n)
End Sub
則：（1）該程序的算法執(zhí)行流程包含 （7） ；（填：選擇模式、循環(huán)模式）
（2）該程序運(yùn)行后，在文本框Text1中顯示的是 （8） 。
8. 以下Visual Basic程序的功能是：計(jì)算表達(dá)式1－2＋3－4＋5－6＋…＋99－100的值，并在文本框Text1中輸出計(jì)算結(jié)果。
Private Sub Command1_Click()
Dim i As Integer, s As Integer
s = 0
i = 1: t = 1
Do While i <= 100
s = s + i
t = -t
i = i + 1
Loop
Text1.Text = Str(s)
End Sub
問：（1）循環(huán)剛退出時(shí)變量i的值是_____（9）____。
（2）為了實(shí)現(xiàn)上述表達(dá)式的計(jì)算，程序中劃線處的表達(dá)式應(yīng)更正為___（10）____。
9.有如下Visual Basic程序：
Private Sub Command1_Click()
Dim s As Integer, t As Integer
t = 1: s = 0
For i = 1 To 10 Step 2
t = t * 2
s = t + 1
Next i
Text1.Text = Str(s)
End Sub 問：（1）程序運(yùn)行后，變量s 的值為_____（11）___。
（2）程序運(yùn)行后，語句“t = t * 2”被執(zhí)行的次數(shù)為____（12）___。
10、有如下程序段：
x = 5
y = 10
z = 12
If x + y > z And y + z > x And x + z > y Then a = "True " Else a = "False "
該程序段運(yùn)行后，a 的值為　　（13）　。
11、有如下程序段：
x=6
k=1
do while k<=5
k=k+3
x=x+k
loop
該程序段運(yùn)行后，x的值為　　（14） 　。
12．有道寫于紙上的數(shù)學(xué)題因雨水問題淋濕，有兩個(gè)數(shù)字已模糊不清：
（3□+42）×6＝46□
某同學(xué)為了找出這兩個(gè)數(shù)，編寫了下列Visual Basic程序：
Sub command1_click( )
Dim x as integer,y as integer
For x=0 to 9
For y=0 to 8 step 2
If _____（15）_____________ then
List1.additem ”(3”& str(x)&”+42)*6=46”&str(y)
Endif
Next ___（16）_
Next ____（17）___
End sub
13.個(gè)位數(shù)字是6，且能被3整除的3位數(shù)共有多少個(gè)？下面程序用于解決這一問題，在劃線處填入合適的語句或表達(dá)式，完成程序。設(shè)共有n個(gè)這樣的數(shù)，Visual Basic程序如下：
Sub command1_click( )
Dim i as integer,n as integer
m=106:n=0
do while m<=996
if m mod 3=0 then ______（18）______
m=m+10
loop
text1.text=_____（19）__
End sub
14、隨機(jī)產(chǎn)生10個(gè)1～100之間的正整數(shù)，按從小到大的次序排序并輸出。為了實(shí)現(xiàn)這一目標(biāo)，完善下面的VB程序，在劃線處填入合適的語句或表達(dá)式，完成程序設(shè)計(jì)。
sub command1_click()
const n=10
dim i,j,t as integer
dim a(1 to 10) as integer
for i=1 to 10
a(i)=1+int(100*rnd())
next i
For i = 1 To n - 1
For j = i+1 To n
If ____ （20） __ Then
k = a(i): a(i) = a(j): a(j) = k
End If
Next j
Next i
For i = 1 To n
List1.AddItem Str(a(i))
Next i
End sub
接到這份出卷通知很緊迫，而且要求是：僅僅這10多個(gè)會(huì)考知識(shí)點(diǎn)，要出滿90分鐘，而且是要求不能讓學(xué)生在考場上時(shí)間太寬裕。一則緊迫，二則可能考的知識(shí)點(diǎn)會(huì)有很多重復(fù)，三則出卷水平有限，僅僅只能做到盡量題型不重復(fù)。所以，有了這樣的題量。
( http: / / www.21cnjy.com / )
( http: / / www.21cnjy.com / )
開始
結(jié)束
輸出 a
輸出b
b>=9？
N
Y
a←3
b←a+5
2009學(xué)年第二學(xué)期三校期中考試
高一信息技術(shù) 答題卷

展開更多......

收起↑