资源描述
台州中学2022学年其次学期期中试题
高一 技术
信息技术部分
命题人：许周旺 审题人：戴荣炉
一、单选题：（本大题15小题，每小题2分，共30分）
1．下列不属于信息的是( )
A．报纸上刊登的新闻 B．书本中的学问
C．存有程序的U盘 D．电视里播放的足球竞赛实况
2．对于信息特征的理解，下列说法正确的是( )
A．信息是可以加工处理的 B．信息共享指的是将信息传递给对方，而自己失去这一信息
C．信息的价值是不会转变的 D．存在不依附于任何载体的信息
3．下列关于算法的叙述不正确的是( )
A．算法是解决问题的方法和步骤 B．算法具有确定性、可行性、有限性等基本特征
C．一个问题的算法都只有一种 D．常见的算法描述方法有自然语言、流程图、计算机语言等
4.一只秀丽的酒杯被摔碎了，则秀丽，酒杯，摔，碎了分别是( )
A．对象，属性，大事，方法 B．对象，属性，方法，大事
C．属性，对象，方法，大事 D．属性，对象，大事，方法
5．下图（第5题图）是VB控件工具箱的部分截图，其中“标签”控件工具是( )
A．1 B．2 C．3 D．4
第5题图
第6题图
6．小李在设计VB程序时所使用复选框对象的属性窗口如上图（第6题图）所示，他想编写该复选框单击大事的处理过程，则该大事处理过程名是( )
A．CheckBox_Click B．加粗_Click C．Check1_Click D．复选框_Click
7．下列可作为VB变量名的是( )
A．4A B．D_Y C．Y + X D．And
8．关于程序中的变量，下面说法中错误的是( )
A．一旦将数据存入某变量，读取变量中的值，不会转变变量的内容
B．一旦将数据存入某变量，以后就不能将新的数据存入该变量
C．一旦将数据存入某变量，以后可以将新的数据存入该变量
D．一旦将数据存入某变量，只要不把新的数据存入，变量的内容不会转变
9．在Visual Basic中，语句Text1.Text="QQ2022"中的Text1是( )
A．属性名 B．属性值 C．对象名 D．窗体名
10．有一属于挨次结构的流程图，以下流程图中的符号，可能不需要用到的是( )
A． B． C． D．
11．在VB中，下列函数返回值最大的是( )
A．Sqr(9) B．Abs(-3.2) C．int(3.2) D．Len("3.2")
12．有如下VB程序段
m=a(1)
For i=2 to 100
If a(i) > m then m=a(i)
Next i
该程序段执行后，变量m中存储的是( )
A．累加值 B．计数值 C．a(1)至a(100)中的最大值 D．最小值
13．已知三角形的三条边长分别为、、，半周长，该三角形面积计算公式为：，计算S的VB语句是( )
A． B．）
C． D．）
14．为使左、右框内的Visual Basic程序段能实现相同的功能：
右框内划线处的内容可以是( )
（A）s < 9 （B）s <= 9 （C）t < 9 （D）t <= 9
第15题图
15. 小明编写了如下VB程序段：
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
x = Val(Text1.Text)
y = Abs(x)
x = int(y)
Text2.Text = Str(x)
End Sub
此应用程序执行后，毁灭了如第15题图所示的错误信息，请问产生此错误的缘由是( )
A. 语句y = Abs(x)有误 B. 缺少对象‘424’
C. 语句x = int(y)有误 D. 缺少文本框Text1或文本框Text2
二．综台题：本大题共5小题，其中第16题3分，第17题2分，第18题4分，第19题6分，第第20题5分，共20分。
16．有如下VB程序段
a=12
b=54
a=b
b=a
该程序段运行后，a，b的值分别为___、___，该程序结构属于_______结构（选填：挨次、选择、循环）。（每空1分）
17.小强想编写一个能够完成交换变量a和b值的小程序，该程序对应的算法流程图如下图所示：
开头
变量a,b分别赋值
b=b+a
a=b-a
结束
输出a,b
该流程图粗线框部分所在的位置应填写的内容是 。（2分）
18. 有如下Visual Basic程序段：
Dim i As Integer, s As Integer
i = 1
s = 0
Do While i <= 5
s = s + 2
i = i + 1
Loop
问：该程序段运行后，变量s的值为____________，i的值为 。（每空2分）
19. 在窗体上有一个命令按钮（Command1）和两个文本框（Text1和Text2），然后编写了如下大事过程，要求：在文本框Text1中输入一个数值x，依据下面的分段函数计算y的结果，并将y值显示在文本框Text2中。
请将实现以上功能的程序补充完整(（每空2分）：
Private Sub Command1_Click( )
x= Val (Text1.text)
If x>0 Then （第19题）
ElseIf Then
y = 0
ElseIf x < 0 Then
y = Abs(x)
End If
End Sub
20. 王敏的E-Mail邮箱密码遗忘了，但她需要收一封很重要的来信，请你帮她尽可能找出密码。她零星记得自己密码信息：
①密码是六位数字，前面两位为31；
②最终两位数字相同；
③能被16和46整除。
程序界面如下图所示，单击 "挂念找回密码"按钮（Command1），可能的密码显示在列表框List1中。
解决此问题的相应程序如下：
Private Sub Command1_Click()
Dim a As Integer, s As long, b As Integer, i As Integer
For i = 0 To ①
s = 310000 + i
If s Mod 46 = 0 And s Mod 16 = 0 Then
②
b = (s Mod 100) \ 10
If a = b Then
List1.AddItem Str(s)
End If
End If
Next i
End Sub
（1）解决此问题的算法是________________。（选填：枚举算法 或 解析算法）（1分）
在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
（2）程序中①划线处应填入__________________。（2分）
（3）程序中②划线处应填入__________________。（2分）
台州中学2022学年其次学期期中考试技术
信息技术部分参考答案
一.选择题： C B C D A C B B C B B C D B D
二.填空
16. a，b的值分别为_ 54__、_54__，该程序结构属于___挨次____结构（每空1分）
17. b=b-a （2分）
18. 变量s的值为______10______，i的值为 6 。（每空2分）
19. __y=x*x_+2*x+1_ __x=0__ ___text2.text=str(y) 或_text2.text= y __（每空2分）
20. （1）解决此问题的算法是_____枚举算法___________。（1分）
（2）程序中①划线处应填入______9999____________。（2分）
（3）程序中②划线处应填入______a= s mod 10____________。（2分）
展开阅读全文
浙ICP备2021020529号-1 | 浙B2-20240490 
