相关试卷
-
1、有如下VB 程序代码段：
s1 = "51577": s2 = "75929"
i = 1: j = 1: k = 0
Do While i <= Len(s1) And j <= Len(s2)
c1 = Mid(s1, i, 1): c2 = Mid(s2, j, 1)
If Abs(Val(c1) - Val(c2)) < 4 Then
i = i + 1
Else
k = k + 1
End If
j = j + 1
Loop
执行该程序段后，变量k的值是（ ）
A、2 B、3 C、4 D、5 -
2、某算法的部分流程图如图所示。
执行这部分流程，若输入n的值为22，则输出的t的值为（ ）
A、"1101" B、"1011" C、"10110" D、"01101" -
3、下列选项中，表达式的值与其他三项不同的是（ ）A、Abs(Int(-1.5)) B、5 Mod 2 C、Int(Rnd + 1) D、Val(Mid("2021", 4, 1))
-
4、将一幅未经压缩的1024×768 像素、256 级灰度的BMP图片，另存为512×384像素、黑白的BMP图片，转换前后两个文件的存储容量比为（ ）A、128:1 B、32:1 C、16:1 D、4:1
-
5、使用GoldWave软件编辑某音频文件，部分界面如图所示。
下列说法正确的是（ ）
A、当前状态下执行“删除”操作后，音频总时长减少3秒 B、当前状态下执行“剪裁”操作后，音频总时长变为3秒 C、当前状态下执行“静音”操作后，音频总时长减少3秒 D、当前状态下执行“插入静音”操作后（时长为3秒），音频总时长增加3秒 -
6、使用UltraEdit软件观察字符“2020，武汉加油！”的内码，部分界面如图所示。
下列说法正确的是（ ）
A、图中内码表示的ASCII码字符共有6个 B、字符“!”的十六进制内码为A1 C、字符“3”的内码用二进制表示是“00110011” D、存储该段字符需要14个字节 -
7、使用Access软件设计一个数据表，存储如图所示的学生消费记录数据。
序号
学籍号
姓名
金额
消费窗口
日期
是否住校
1
HZ20201121
沈宵阳
￥11.50
9
2021/5/17
是
2
HZ201801 13
王加娜
￥9.50
11
2021/5/17
否
3
HZ20200603
张颢琎
￥12.00
3
2021/5/18
否
…
…
…
…
…
…
…
下列表结构设计合理的是（ ）
A、
B、
C、
D、
-
8、下列有关网页和浏览器的说法，正确的是（ ）A、网页中的图像不能设置超链接 B、HTTP协议用于浏览器与Web服务器之间的信息传输 C、网页必须同时具备文本、图形图像和超链接这三种基本元素 D、在IE浏览器中，使用“添加到收藏夹”功能可以保存正在浏览的网页内容
-
9、下列有关信息和信息技术的说法，正确的是（ ）A、计算机中存储的数据是信息 B、广播、电视都是常见的信息表达方式 C、可以利用信息技术把信息从一种形态转换为另一种形态 D、信息技术是伴随着计算机和互联网技术的发展而诞生的
-
10、学校心理活动节举办“两人三足跑”比赛，比赛规则为：
⑴起点与终点之间共有10 个站点（包括起点与终点），依次为站点1、站点2……、站点10。参赛选手均从起点（站点1）出发，最先恰好到达终点（站点10）的一组选手为胜；
⑵对“恰好到达终点”的界定。比赛前，参赛选手随机抽取一个行进方案，该方案由5个正整数（范围为1～6）组成，表示参赛选手整个行程分5 个阶段完成，并规定了每个阶段能行进的站点数。若某一阶段按所给站点数行进还未到达终点，则向前（终点方向）行进；若某一阶段按所给站点数行进超过终点，则要折回直至行进完所给站点数；前四个阶段不出现按所给站点数行进恰好到达终点的情况，直至行进满五个阶段，且第五阶段按所给站点数行进恰好到达终点，则称为“恰好到达终点”。如方案“3,1,6,4,3，”满足“恰好到达终点”，按该方案行进的过程如图a所示：
组织方为了验证设计方案，编写了如下VB 程序：在文本框Text1 中输入待检验的方案（输入1～6 范围内的整数并以逗号分隔，且以逗号结束。例如：“3,1,6,4,3,”），单击“验证”按钮Command1，判断方案是否能恰好到达终点。若能，在标签Label2中显示“可行方案！”；若不能，则显示“不可行方案！”。程序界面如图b所示。
(1)、若对方案“5,2,6,3,1,”进行验证，则该方案的验证结果是。(2)、实现上述功能的VB 程序如下，请在划线处填入合适的代码。Const n = 10
Private Sub Command1_Click( )
Dim a(1 To n)As Integer '表示每一个起点距离终点的站点数
Dim b(1 To 5)As Integer
Dim start As Integer, cnt As Integer, endsAs Integer
Dim i As Integer, j As Integer, c As String, sAs String
Dim flag As Boolean
s = Text1.Text: j = 1
For i = 1 To n
a(i) = n - i
Next i
For i = 1 To Len(s)
c = Mid(s, i, 1)
If c = "," Then
Else
b(j) = Val(c)
End If
Next i
cnt = 1: flag = True
start = 1: ends = 0
i = 1
Do While flag = True And i <= 5
If b(i) = a(start) Then
flag = False
Else
ends = start + b(i)
start = adjust(ends)
cnt = cnt + 1
End If
i = i + 1
Loop
If Then
Label2.Caption = "可行方案！"
Else
Label2.Caption = "不可行方案！"
End If
End Sub
'adjust函数的作用是：根据参数ends的值来调整start的值
Function adjust(endsAs Integer) As Integer
Dim start As Integer
If ends < n Then start = ends Else start =
adjust = start
End Function
-
11、为了把工厂中高低不等的物品按从低到高排好序，工程师发明了一种排序机械臂，它首先在参加排序的所有物品中同时选出高度最低和最高的物品，分别交换到左、右边界，再缩小左、右边界，然后在余下的物品中采用同样的方法排序，直到所有物品成为一个有序的序列。编写VB 程序，实现上述排序功能：运行程序，单击“读取”按钮Command1，在列表框List1中显示待排序的物品，然后单击“排序”按钮Command2，在列表框List2中显示排序好的物品。程序运行界面如图所示。
请回答下列问题：
(1)、若要程序运行时,窗体Form1 的标题显示为“物品排序”，则Form_Load()事件中应添加的代码是（单选，填字母：A .Form1.Name="物品排序" /B .Form1.Text = "物品排序"/C .Form1.Caption ="物品排序"）。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const m = 9 'm表示物品个数
Dim id(m) As Integer, gd(m) As Integer
Private Sub Command1_Click()
'读取物品的信息依次存入数组id，gd中，并在列表框List1中显示，代码略
End Sub
Private Sub Command2_Click( )
Dim LAs Integer, R As Integer, t As integer
Dim imin As Integer, imax As Integer
L = 1: R = m '分别指向待排序区间的左右边界
Do While L < R
imin = L
For i = L + 1 To R
If
Then imax = iIf gd(i) < gd(imin) Then imin = i
Next i
t = id(imin): id(imin) = id(L): id(L) = t
t = gd(imin): gd(imin) = gd(L): gd(L) = t
If imax = L Then '考虑最大值恰好在L位置的情形
t = id(imax): id(imax) = id(R): id(R) = t
t = gd(imax): gd(imax) = gd(R): gd(R) = t
L = L + 1
Loop
For i = 1 To m
List2.AddItem Str(id(i)) + " " + Str(gd(i))
Next i
End Sub
a(i) = n - i
Next i
(3)、程序中加框处代码有错，请改正。 -
12、小李使用Flash软件创作题为“低碳出行”的多媒体作品，请回答下列问题：
(1)、下列有关多媒体作品制作流程的说法，正确的是 （多选，填字母）。A、考虑作品的社会和经济效益属于创作需求分析 B、了解用户的计算机应用水平属于应用需求分析 C、作品的系统结构设计描述了整个作品的组成部分、工作流程和主要界面 D、确定作品素材的获取方式和加工方式，需要在模块设计中完成 E、制作脚本是多媒体作品制作的直接依据(2)、制作“自行车”动画时，第15帧和第25帧中实例的部分属性界面如图b所示，可推测“自行车”移动方向是（单选，填字母：A .水平向右/B .垂直向上/C .水平向左/D .垂直向下），该动画类型为（选填：形状补间/动画补间）
(3)、如图a所示，“蝴蝶图层”第1帧到第40帧实现了蝴蝶从舞台右上方飞向舞台左下方的动画效果，为使“蝴蝶”图层的动画从第10帧开始出现，且动画时长保持不变，正确的操作是 （多选，填字母）A、将“蝴蝶”图层第1帧至第40帧整体移动到第10帧至50帧 B、选中“蝴蝶”图层第40帧执行清除关键帧操作，再将第1帧移动至第10帧 C、将“蝴蝶”图层第1帧移动到第10帧，再选中第30帧至第40帧执行插入帧操作 D、删除“蝴蝶”图层第1帧至第9帧，再将第40帧移动至第50帧(4)、测试影片时，单击当前场景中的“播放”按钮，影片跳转到“ditan”场景第1帧并停止播放，则“播放”按钮的动作脚本为 。 -
13、使用Excel软件处理2020年度浙江省地区生产总值和增长速度相关数据，如图a所示。
请回答下列问题：
(1)、B14单元格计算了2020年第一季度各产业的生产平均值，C14:K14的值由B14单元格通过自动填充得到，则J14单元格中的公式为。(2)、对各产业数据以“2020 年第四季度”的“绝对值(亿元)”为关键字按升序排序，则排序的数据区域是。(3)、根据图a中部分数据创建了如图b所示的图表，结合图a和图b，下列描述正确的有 （多选，填字母）
A、对区域A1:K1执行“合并单元格”操作，合并后的单元格名称为A1 B、若B5 单元格的数据修改为“500”，则图表会随之发生改变 C、生成图b 所示的图表的数据区域为A2，A5:A10，F2:F3，F5:F10 D、若对区域B4:K14设置单元格格式为保留0位小数，则图表不会随之发生变化 -
14、某查找算法的VB 程序段如下：
Dim a(1 To 10) As Integer
Randomize
n = 0
i = 1: j = 10
Key = Int(Rnd * 25) * 2 + 1
Do While i <= j
m = Int((i + j) / 2)
If Key = a(m) Then Exit Do
If Key > a(m) Then
i = m + 1: n = n * 2 + 1
Else
j = m - 1: n = n * 2 - 1
End If
Loop
数组元素a(1)到a(10)的值依次为“5,8,11,18,23,29,33,42,45,51”。执行该程序段后，n的值不可能的是（ ）
A、15 B、7 C、3 D、-1 -
15、对一组数据采用冒泡排序算法进行排序，若第一趟排序完成后的数据序列为：31,24,23,15,20,10，则该数据序列的原始顺序不可能的是（ ）A、24 23 15 31 10 20 B、24 23 15 20 31 10 C、24 31 15 23 20 10 D、23 24 15 20 31 10
-
16、有如下VB 程序段：
s=Text1.Text: n=len(s): y=" "
For i = 1 To n\2
If Mid(s, i, 1) = Mid(s,n-i+1,1) Then
y = Str(i)+y
End If
Next i
若在文本框Text1中输入字符串“abc2008cba”，则y的值为（ ）
A、1 2 3 4 B、4 3 2 1 C、5 3 2 1 D、1 2 3 5 -
17、有如下VB 程序段：
c =0: k = 1
For i = 2 To 10
If i Mod 2 <> 0 And a(k) < a(i) Then
k = i
c = c + 1
End If
Next i
数组元素a(1)到a(10)的值依次为“12, 33, 14, 6, 7, 23, 25, 37, 34, 40”，执行该程序段后，变量k和c的值分别为（ ）
A、9 3 B、10 3 C、5 1 D、4 2 -
18、某算法流程图如图所示：
若输入m和n的值分别为30和12，则执行这部分流程后，变量m的值为（ ）
A、4 B、5 C、6 D、7 -
19、若x=20，y=21，有VB表达式：
① x<>y And x<y
② "x" + "y" = "41"
③ x / 10 * y = x * y \ 10
④ x \ 10 = y Mod 2
⑤ Int(Sqr(x+y))=6
上述表达式的值为True的有（ ）
A、①③⑤ B、①③④ C、②④⑤ D、②③⑤ -
20、一段时长为10秒、1024×768像素、PAL制式（25 帧／秒）的未经压缩的AVI格式无声视频，其存储容量约为188MB，则该视频的颜色位深度是（ ）A、4 位 B、8 位 C、16 位 D、24 位