信息技术期中考试卷

信息技术期末试题

满分100分，考试时间60分钟。

一、选择题（每小题2分, 共60分)

1.从信息安全角度看，以下选项中比较适合作为密码的是：

A 12345678

B password

C px965m3h

D aaaaaaaa

2.2009年3月1日，我国自行研制的月球探测卫星“嫦娥一号”在完成预定任务后成功实现撞月。

这之前，“嫦娥一号”拍摄了约1.37TB的月球照片传回地球供后续研究，“嫦娥一号”拍摄月球照片的过程在信息技术中常被称作

A 信息加密

B 信息管理

C 信息交流

D 信息采集

3.随着信息化进程的不断加快，信息安全越来越被人们所关注。下列说法正确的是

A 及时安装计算机系统软件的补丁程序，堵住系统的漏洞与后门

B 对计算机中的文件进行加密，可以防止感染计算机病毒

C 在计算机中安装了杀毒软件，就不会再感染计算机病毒

D 保持计算机教室的清洁卫生，能有效防止计算机病毒的入侵

4.下列软件中，主要用于对文件进行压缩和解压缩的是

A Frontpage

B Flash

C winrar

D Excel

5.用Windows中的“录音机”软件录制声音文件，是将声音模拟信号

A 转换成ASCII码

B 转换成像素点

C 转换成区位码 D进行采样和量化

6.算式(78)10 -(1101) 2的结果是 ( )

A (1000001)10

B (1000001)2

C (13)10

D (11010)2

7.汉字点阵码是一种用黑白两色点阵来表示汉字字形的编码，一个16X16点阵字模的存储容量为

A 1字节

B 16字节

C 32字节

D 64字节

8.某电子设备的电路板上有一个6位“跳板开关”，此开关每一位都只有“打开”和“闭合”两种

状态。这个“跳板开关”最多能表示的状态数为：

A 128

B 64

C 60

D 6

9.下面关于算法的描述，正确的是（）

A．算法不可以用自然语言表示

B．算法只能用框图来表示

C．一个算法必须保证它的执行步骤是有限的

D．算法的框图表示法有0个或多个输入，但只能有一个输出

10.设a=2，b=3，c=4，d=5，表达式a>b and c<=d or 2*a>c的值是（）

A．True B．False C．－1 D．1

11.下列可作为VB变量名的是（）

A． 4*D B． A_B C． 4ABC D．A+B

12.用语句 Dim A(－3 To 5) As Integer所定义的数组的元素个数是（）

A．6 B．7 C．8 D．9

13.随机数函数Rnd可以产生一个大于等于0且小于1的随机数，现在想产生一个[6，24]的随机整

数，可行的表达式是（）

（A）Rnd*24 （B）int(6+Rnd*18)

（C）6+int(Rnd*18+1) （D）6+int(Rnd*19)

14.下面程序段是利用For语句给数组a赋值，使a(1)=2，a(2)=4，a(3)=6，…，a(100)=200，则

划线处的语句应该是（）

For i= 1 To 100

_____________

Next i

（A）a(i)=i+2 （B）a(i)=i*i

（C）a(i)=i （D）a(i)=2*i

15.有如下Visual Basic程序段运行后，变量X的值为（）

x=3

do while x<7

x=x+2

loop

（A）3 （B）5 （C）7 （D）9

16.某超市水果区共有5种水果品种，其价格依次为9.20、4.00、8.50、1.80、2.50，

若采用冒泡排序算法对其进行从小到大排序，则第二趟的排序结果是

（A）1.80 8.50 2.50 9.20 4.00 （B）1.80 2.50 9.20 4.00 8.50 （C）1.80 4.00 9.20 2.50 8.50 （D）1.80 2.50 8.50 4.00 9.20 17.一次运动会上,某组6位选手的百米成绩(单位:秒)分别是14.1 , 12.3 , 11.2,14.8,13.9,11.0,

若使用选择排序法将该组的成绩按第一名、第二名、第三名……的顺序排序，则第一次交换数据后的顺序是（）

（A）14.8，14.1，12.3，11.2，13.9，11.0 （B）11.0 , 12.3, 11.2, 14.8, 13.9, 14.1 （C）14.8， 12.3，11.2，14.8,13.9，11.0 （D）11.0 , 14.1,12.3,11.2,14.8,13.9

18.用X、Y、Z表示三角形的三条边，条件“三角形任意两边之和大于第三边”的表达式，可以用

下列表示的是( )

（A）X+Y>Z And X+Z>Y And Y+Z>X （B）X+Y

（C）Not(X+Y=Z Or X+Z>=Y Or Y+Z>=X

19.在Visual Basic中，要定义一个一维数组a，用于存储15名铅球运动员的成绩数据（以米为

单位，精确到0.01米），则正确的数组定义语句是( )

（A）Dim a(1,15) As Integer （B）Dim a(1,15) As Single

（C）Dim a(1 To 15) As Single （D）Dim a(1 To 15) As Integer

20.如下图所示的流程图片断

上述流程图执行过后，A、B的值分别为（）

A．A是20，B是30 B．A 是20，B是20

C．A是30，B是30 D．A是30，B是20

21.下面是一段关于计算变量s的算法：

S=0 : a=1

For i=1 to 10

s=s+i*a

a=-a

Next i

这个计算s值的算法中，s的代数式表示式（）

A．1－2+3－4+…+(-1)n×(n－1) B．1－2+3－4+…+(-1)n×n

C．1+2+3+4+…+(n－1)+n D．－1－2－3－…－n

22.报名参加冬季越野赛跑的某班5位学生的学号是：5，8，11，33，45，50，60，65。利用对分

查找，查找学号为34号学生的过程中，依次被访问到的学号是

（A）33，50，45 （B）33，45 （C）45，11，33 （D）33，60，45

23.下面程序段运行后x的值是为：

a="1234":b="5555"

x=Val(a)+Len(b)

A."12345555"

B.6789

C.8

D.1238

24.有如下一组数据：9，3，16，89，54，20，95 如果使用选择法排序，则数据需要交换的次数

是：

A.1

B.2

C.3

D.4

25.十六进制数7BH转换成二进制数是

（A）(1111111)2（B）(1111011)2（C）(1111101)2（D）(1111110)2

26.用UltraEdit软件观察字符内码，结果如下图所示：

若被观察的字符全部属于GB2312编码汉字，则图中内码表示的汉字共有（）

（A）1个（B）2个（C）5个（D）10个

27.现计算器上xy运算处理的算法部分流程图如下图所示：

空白矩形框中应该填入的是 （A ）f ←f*x （B ）f ←x*j

（C ）f ←f+x （D ）f ←f*j

28. 如下Visual Basic 程序，单击命令按钮Command1，出现如图所示的出错信息。发生“下标越

界”错误时所执行的语句是

Private Sub Command1_Click() Dim a(0 To 5) As Integer

Dim i As Integer '① a(0) = 1 '② For i = 1 To 5

a(i) = 2 * a(i - 1) + 1 '③ Next i

Text1.Text = Str(a(6)) '④ End Sub

（A ）① （B ）② （C ）③ （D ）④ 29. 在Visual Basic 中，语句Year.Caption = "2010" 中的“Year ”是

（A ）属性值（B ）属性名（C ）对象名（D ）类名

30. 递归函数是一种在定义函数时就调用自己的一种函数，他可以方便的解决很多有趣的问题，下

面是用递归计算n ！=1*2*……*n ，在画线处填入

Function f(n as integer)as integer

If n=1 then

f=1 else

_______ end if End function

（A ）f=n*(n-1)（B ）f=n*f(n-1)（C ）f(n)= n*(n-1)（D ）f(n)=n*f(n-1)

二、程序阅读

1、下列Visual Basic 程序：

Private Sub Command1_Click()

Dim sum As Long , i As Integer

sum = 0

For i = 1 To 100 Step 2

sum = sum + i * i

Next i

Text1.Text = Str(sum)

End Sub

该程序能完成计算的数学表达式是__________________，

循环结束后i的值_________，共循环______次

2、下面的程序是求7!（7!=1*2*3...*6*7）的值，并在文本框text1输出这个值。程序中有两处错误，请更正。

Private Sub Command1_Click()

Dim a As Single

a=0

For i=1 to 7

a=a*i

Next i

Text.text=str(a)

End Sub

错误的语句：①_____________________________ ②___________________________

更正：①_____________________________ ②___________________________

3、有道写于纸上的数学题因雨水问题淋湿，有两个数字已模糊不清：

（3□+42）×6＝46□

某同学为了找出这两个数，编写了下列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 __________________ then

List1.additem “(3”& str(x)&”+42)*6=46”&str(y)

Endif

Next ______

Next _______

End sub

4、 在

下列VB 程序的设计界面如图所示，程序运行时，在文本框Text1中一个0～5之间的整数，单击“显示”按钮Command1后，对象Shape1呈现与该数对应的形状，如果输入数据不在此范围，则标签Labe12显示“请输入0～5之间的整数”，假如输入“0”，则对象Shape1呈现矩形。

请在划线处填入合适代码。

Private Sub Command1_Click() Dim x As Integer Label2.Caption=“” x=Val(Text1.Text) If x ＞=0 And x ＜=5 Then

Shape1.Shape= (1) Else

(2) =“请重新输入0～5之间的整数” End If End Sub

5、 下列VB 程序实现如下功能：程序运行时，在文本框Text1和Text2中分别输入x 和n 的值，单击命令按钮Command1后，调用函数f 计算s 的值，并在文本框Text3中显示计算 结果。!

3!

232

n x s

x

x

x

n

+?++

+

=！。请在划线处填入合适的代码。

Private Sub Command1_Click ( )

Dim x As Single , n As Integer , s As Single x = Val ( Text1．Text ) n = Val ( Text2．Text ) s = f ( x , n ) Text3．Text = End Sub

Private Function f ( x As Single , n As Integer ) As Single

Dim sum As Single , i As Integer , t As Single

sum = 0

t = 1

For i = 1 To n

t = t * x / i

sum =

Next i

f = sum

End Function

6、函数mid(s,n,k)的返回值是字符串s第n个字符开始的长度为k的子串，函数len(s)的返回值是字符串s长度

写出单击窗体后程序的执行结果

private sub s1(s as string)

dim k as integer, n as integer, c as string

n =len(s)

if n mod 2=1 then c = mid(s,n\2+1,1)

for k = 1 to len(s)\2

c = mid(s, len(s)+1-k,1)+c+mid(s,k,1)

next k

s =c

end sub

private sub command1_click()

dim x as string

x = inputbox(“x=”)

call s1(x)

print x

end sub

单击command1后输入“abc”，窗体上显示的内容是

单击command1后输入“abcd”，窗体上显示的内容是

附加题：请根据描述，写出程序。

现有一个酒店有100个房间，依次编号为1到100，第一个服务员经过，将所有房间门关上；第二个服务员经过将所有编号为2的倍数房门打开；第三个服务员经过将所有编号为3倍数的房门打开的关上，关闭的打开。依此类推。问当第100个服务员经过之后，哪些房间的门是关着的？