资源简介

台州市书生中学 第一次月考高二信息试卷
（满分：50分 　考试时间：45 分钟） 　　　 2019.10
一、选择题（本大题共12小题，每小题2分，共24分。在每小题给出的四个选项中，只有一个符合题目要求）
在网上阅卷的大背景下，个人信息条形码使用广泛，下列有关信息的说法，正确的是（ 　）
生成条形码，是信息的编码过程
使用条形码，是为了鉴别试卷的真伪
每位学生的条形码是固定的，说明信息不可以加工和处理
每位学生的条形码只能有一张，说明信息只能是一种形态
2.
用Ultraedit软件查看字符“2019，高考！”的内码，部分界面如图所示。
下列说法正确的是( )
A．
字符“2019，高考！”全部采用GB2312编码
B．
字符“！”存储时占用1个字节
C．
字符“，”的十六进制编码为“A3”
D．
字符“0”的二进制编码为“00110000”
3. 某版本软件的相关信息如第3题图所示。分析图中信息，下列说法不正确的是（ ）
A. 该软件可在安卓操作系统中运行
B. 该软件文件大小约为46653KB
C. 涉及个人推荐与统计评价的信息评价方式
D. 热门标签有助于软件被检索下载
4. 将一幅未经压缩的1024*768像素，256色BMP图片，转换成JPEG格式后，存储容量为76.8KB,则压缩比约为（ ）
A.320:1 B.8:1 C.10:1 D.7:1
5. 下列VB表达式中，值最大的是（ ）
A. Abs(-8)+Len("Taizhou")
B. Val(Mid("Zhe2017Jiang", 6,2))
C. Int(2*Sqr(49)+7.5)/3
D. 10^2 Mod 252^2
6.某算法的部分流程图如右图所示。以下说法正确的是（ ）
A．该流程图属于选择结构
B．执行这部分流程后，c ← c + 2执行的次数为2次
C. 执行这部分流程后，c的值是22
D．执行这部分流程后， 执行的次数为10次
7．在 VB 中，窗体加载的事件处理过程名为（ ）
A．Form_Click B．Form_DblClick
C．Form_Load D．Form_Change
8．观察第8 题图，下列说法正确的是（ ）
第8题图
“第一个 VB 小程序”是窗体的 Name 属性值
B．“Label4”是当前选中对象的名称
C．“VB01.vbp”是工程文件名
D． 该窗体中共有 3 个对象
9. 十进制正整数n转换为二进制数，该二进制数末位是“1”，下列说法正确的是（ ）
A．可以确定n是偶数
B．若该二进制数的位数是4，则将n的最大值转换为十六进制是E
C．在该二进制末位添加一个“0”，产生的新二进制数为该二进制数的2倍　 　
D．将该二进制数加1，其二进制位数一定增加1位
10.下列程序执行后变量c的值为（ ）
c=0
For i=1 to 10
If i mod 2=0 or i mod 3 =1 then
c=c+1
End If
Next i
A.4 B.5 C.6 D.7
11.有如下VB程序段：
s = Text1.Text
t = 0: Sum = 0
For i = 1 To len(s)
c = Mid(s, i, 1)
If c >= "0" And c <= "9" Then
t = t * 10 + Val(c)
ElseIf c >= "a" And c <= "z" Then
Sum = Sum + t
Else
t = 0
End If
Next i
Text2.Text = Str(Sum)
在文本框Text1中输入“123aBc456”，执行程序段，文本框Text2中显示的内容是（ ）
A．456 B．654 C．579 D．123
12.有如下VB程序段:
Dim a(1 To 10) As Integer
Pos= -1
i=1
Do While i<=10
　If i Mod 2=0 Then a(i)=i*2 Else a(i)=i
　i=i+1
Loop
i=10
Do While i>=1
　If a(i)=12 Then Pos=i
　i = i-1
Loop
该程序段运行后,变量Pos值是(　　)
A.1 B.2 C.6 D.10
二、非选择题（共3题，其中13题7分，14题7分，15题12分）
13. 编程找出四位整数abcd 中满足下述关系的数：（ab+cd)(ab+cd)=abcd。小明编写了一个此问题求解的 VB程序，单击“求解” 命令按钮 Command1，在列表框List1中显示结果，如（20+25）*（20+25）=2025，则在列表框显示“2025”（注：双引号不显示）。程序设计界面如图所示：
(1)如图所示，小明通过设置“ 求解” 命令按钮 Command1 的____________ （单选,填字母：
A.Caption B.Font C.Height ）属性设置文字“求解” 为斜体。
(2)为实现上述功能，请在划线处填入合适代码或选项。Private Sub Commandl_Click() Dim i As Integer Dim k As Long, m As Long, n As Long For i = 1000 To 9999 m = i 100 n =________①__________ k = (m + n) * (m + n) If k = i Then
__________②____________
End IfNext i
End Sub(3) 由上述算法可知，“3025”这个四位数 __________(选填：会/不会）在列表框 List1 中显示。
14. 编写“幸运数字”程序，功能如下：在文本框Text1中输入出生日期，单击“算一算”按钮Command1，将日期中所有的数字按位相加，若结果为两位数则继续按位相加，直到结果为一位数，如出生日期为2003/08/11，数字按位相加2+0+0+3+0+8+1+1＝15，15按位相加1+5＝6。运行界面如图所示。
（1）程序窗体中共有 类对象。
（2）请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim luck As Integer
Dim sr, c As String
luck = 0
sr = Text1.Text
If Len(sr) = 10 Then ’输入的格式长度符合条件
For i = 1 To Len(sr)
c = ①
If c >= "0" And c <= "9" Then
luck = luck + Val(c)
End If
Next i
Do While luck > 9
luck = luck Mod 10 + ②
Loop
Label2.Caption =“你的幸运数字是：”+str(luck)
Else
Label2.Caption = "输入有误，请重输！"
End If
End Sub
（3）若在文本框Text1中输入“2004/08/18”，Label2中显示的内容为 。
15.设某汉字由７×７ 的０、１ 点阵图案组成。依照以下规则生成压缩码：连续一组数值，从汉字点阵图案的第一行第一个符号开始计算，按书写顺序由左到右，从上到下。压缩码第一个数表示起始的数字（例如０），第二个数表示连续有几个０，第三个数表示接下来连续有几个１，第四个数表示接下来连续有几个０，第五个数表示接下来连续有几个１，以此类推……
例如，以下汉字点阵图案：
０００１０００
０００１０００
０００１１１１
０００１０００
０００１０００
０００１０００
１１１１１１１
对应的压缩码是０３１６１６４３１６１６１３７（第一个数是０，表示一开始时的数字为０）。
请将程序代码补充完整。
Private Sub Command1_Click()
Dim code As String, c As Integer, res As String,k As Integer
code=Text1.Text
k=0
res=""
c=Val(Mid(code,1,1))
For i=2 To Len(code)
　　For j=1 To Val(Mid(code, i, 1))　 '
　　　res=_____①________　　　
　　　_______②___________
　　　If k=7 Then
　　　　　List1.AddItem　 res
　　　　　k=0
　　　　　res=""
　　　End If
　　Next j
　　ｃ＝______③_________　　　'
Next i
End Sub
（２）现给出如下点阵图：
则压缩码为_________________________________。
高二信息技术第一次月考答案
选择题
1
2
3
4
5
6
7
8
9
10
11
12
A
D
A
C
B
B
C
C
C
D
D
C
非选择题(共4题，其中13题7分，14题7分，15题12分)
13.（1）B （1分）
（2）①i mod 100 （2分）
②list1.additem str(k) 或者 list1.additem str(i) 　（2分）
（3）会 （2分）
14.（1）3 （1分）
（2）① Mid(sr, i, 1) 　 （2分）
luck10 （2分）
（3）你的幸运数字是:5 （2分）
15.(1)①res+Str(c) （3分）
②k=k+1 （3分）
③1-c　（3分）
(2)０３８３５９１１２３４８２（3分）

展开更多......

收起↑