相关试卷
-
1、为方便习题讲解,需对某次考试中选择题得分率数据进行统计分析,找出选择题得分率最低的前m项对应的题号及考点(若有与第m项得分率相同的,并选取)。
编写VB程序,实现上述功能。运行程序时,先读取每个选择题的题号、得分率和考点,显示在列表框List 1中。在文本框Text 1中输入得分率最低的前m项值,单击“统计”按钮,按照得分率从小到大升序排序,并在列表框List 2中输出得分率最低前m项的题号、得分率及考点。程序运行界面如图所示。
请回答下列问题:
(1)、“统计”按钮的事件过程名是。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Dim n As Integer
Dim th(0 To 100)As Integer,df(0 To 100)As Single,kd(1 To 100)As String
Private Sub Form_Load( )
‘读取题号、得分率和考点分别存入数组th、df和kd数组,在列表框List 1中显示,代码略
‘选择题的个数存入变量n,代码略
End Sub
Function dq(x As String,k As Integer)As String
‘固定数据的位数
dq= X
Do While
dq=dq+""
Loop
End Function
Private Sub Select _Click( )
Dim m As Integer,i As Integer,j As Integer,p As Integer,t As Integer,mm As Integer
List 2.Clear
m=Val(Text1.Text)
i=1
Do While i<=n-1
p=i
For j=i+1 To n
If Then p= j
Next j
If p<i Then
t=th(i):th(i)= th(p):th(p)= t
End If
If
Then Exit Doi=i+1
Loop
For i=1 To m
List 2.AddItem dq(Str(th(i)),6)+ dq(Str(df(th(i))),8)+ dq(kd(th(i)),12)
Next i
End Sub
(3)、程序中加框处代码有错,请改正。 -
2、使用Flash软件创作一个关于“中秋节”的多媒体作品,部分界面如图所示。请回答下列问题:
(1)、在制作作品前,小明进行了相应的需求分析。下列不属于创作需求分析的是(多选,填字母:A .该作品主要面向中小学生/B .该作品要求使用Flash软件制作/C .该作品的主题思想为“庆祝中秋佳节”/D .该作品的使用价值和使用频率如何/ E .分析作品所需素材的获取方式和处理软件)(2)、已知舞台大小为600×400像素,“小船”图层使用了“小船”元件产生的实例制作补间动画,实现从舞台外左侧缓慢移入舞台中的动画效果,则该图层第1帧中小船实例的坐标值可能是(填字母:A .(300,200)/B .(700,300)/C .(300,300),该补间动画的类型是。(3)、“音乐”图层中的声音同步属性为“数据流”,测试场景时,若要使动画播放到第30帧时,声音重新开始播放,可进行的操作是。(4)、测试影片时,“播放”按钮在影片播放到最后一帧时出现,单击“播放”按钮,影片跳转到“习俗”场景第1帧继续播放,则“播放”按钮的动作脚本为。 -
3、某地事业单位对参加职位招聘的人员进行面试评分,并使用Excel软件进行数据处理,如图a所示。请回答下列问题:
图a
(1)、面试总分是将“语言表达”、“组织协调” 、“举止仪表”、“综合分析”的成绩分别乘以对应的比重后相加所得。可在G3单元格中输入公式 , 并使用自动填充完成G4:G20区域的计算。(2)、为了更直观地对比选手面试项目的得分情况,创建了如图b所示的图表,则生成该图表的数据区域为。
图b
(3)、若在图a所示工作表中对数据进行进一步的操作,下列说法正确的是 (多选,填字母)A、若要对职位编号为“XP04”的选手按“面试总分”列数据从大到小排序,应选择的排序区域为A16:G19 B、在工作表的C列和D列之间插入一列,“面试总分”中显示的值不会发生变化 C、选中数据区域B2:G7进行数据筛选,并设置筛选条件为“面试总分”的“最大3项”,图b并不会发生变化 D、要将选手的各项得分在图b中的柱形上显示,可通过添加图表的“数据标签”来实现 -
4、某对分查找算法的VB程序段如下:
‘数组元素f(1)到f(8)赋初值为0,代码略
Key=2*Int(Rnd*45)+1
i=1:j=9:c=0:s=0
Do While i<j
c=c+1
m=(i+j)\2
f(m)=1
If Key<a(m)Then j=m Else i=m+1
Loop
For k=1 To 8
s=s+f(k)
Next k
数组元素a(1)到a(8)中的值为:4,20,32,42,58,60,90,91。执行该程序段后,下列说法正确的是( )
A、变量c的值可能为5 B、变量s的值一定为奇数 C、变量i的值可能为9 D、变量j的值可能为7 -
5、编写程序,实现功能:通过双向排序,使数组元素a(1)到a(n)升序排列。
Const n =10
Dim a(1 To n)As Integer
‘随机生成10个1-100之间的数存储在数组a中,代码略
For i=1 to n\2
For j= ⑴ To i+1 Step-1
If a(j)<a(j-1)Then t = a(j):a(j)=a(j-1):a(j-1)=t
Next j
For k=i+1 To ⑵
If a(k)>a(k +1)Then t =a(k):a(k)= a(k +1):a(k+1)=t
Next k
Next i
划线处可选代码为:①2 ②n-i+1 ③n ④n-i
则(1)、(2)处语句依次为( )
A、①③ B、③① C、②④ D、③② -
6、有如下VB程序段:
s="R255:G122:B221:End"
c=1
For i=1 To Len(s)
t=Mid(s,i,1)
If t>="0" And t<="9" Then
a(c)=t+a(c)
Else
c=c+1
End If
Next i
已知数组a各元素的初始值均为空字符串,执行该程序段后,字符串122存储在数组( )中。
A、a(2) B、a(4) C、a(5) D、a(6) -
7、有如下VB程序段:
a=Int(Rnd*20)*2+11
r=0:s=""
Do While a>0
r=a Mod 7
s=r&s
a=a\7
Loop
执行该程序段后,变量s的值不可能是( )
A、"16" B、"23" C、"64" D、"100" -
8、某算法的部分流程图如图所示,执行这部分程序,下列说法正确的是( )
A、该流程图用于求1到100间,所有能被5整除的数的和 B、该流程图从结构上看,是一个循环结构中又嵌套了另一个循环结构 C、程序运行结束后,i的值是100 D、将①处s←1:i←2改为s←1:i←1,不影响输出结果 -
9、关于正整数m、n、k的运算,以下VB表达式中的结果与另三个可能不相同的是( )A、m=Int(Sqr(m))^2 B、Int(Rnd* k)/k <1 C、m-(m\2)*2=m Mod 2 D、(n\k=n/k)=(n Mod k =0)
-
10、未经压缩的BMP图像文件和AVI视频文件相关信息分别如下图所示。
文件名:bg.BMP
尺寸:1600*1200
颜色模式:RGB/8
文件名:logo.AVI
尺寸:400*300
颜色模式:256级灰度
时长:10秒
帧频:30fps
由此可知图像文件的存储容量与视频文件的存储容量比约为( )
A、1:50 B、4:25 C、4:75 D、8:15 -
11、使用Photoshop软件制作“四月你好”的作品,部分编辑界面如图所示。
下列说法正确的是( )
A、“背景”图层中的图像内容不可以进行修改 B、可通过“自由变换”仅改变“传统节气”图层中“节气”文字的大小 C、交换“节气解读”和“鱼”图层的顺序,不影响作品的呈现效果 D、可通过“拷贝图层样式”将“夏至”图层的图层样式复制到莲花图层 -
12、某数转换为十进制数为n,若n\5=5,则该数可能是( )A、1DH B、21H C、10111B D、1111B
-
13、用Access软件设计某大学新生管理信息系统的数据库,其中“基本信息表”中需要存储如图所示的数据。
学号
姓名
性别
出生年份
户籍所在地
注册日期
是否住校
202002001
张阳
男
2002
温州市瓯海区
2020/8/31
是
202003001
李玥
女
2001
宁波市北仑区
2020/8/30
否
…
…
…
…
…
…
…
下列关于该新生管理信息系统的描述,正确的是( )
A、该新生管理信息系统是数据库管理系统 B、“姓名”字段设为主键,是合理的 C、“基本信息表”中同一字段的字段值的数据类型定相同 D、该数据表中必定有一个字段的字段名为“户籍所在地” -
14、下列应用中,不属于人工智能应用范畴的是( )A、使用指纹解锁功能解锁手机 B、利用手持金属探测仪对旅客进行安检扫描 C、某“在线翻译”系统将英文文章翻译成中文 D、“无人驾驶汽车”在道路上行驶
-
15、下列有关信息和信息处理的说法,正确的是( )A、计算机中的信息是以十六进制形式存储的 B、声音、图像必须经过数字化后才有价值 C、文字、声音、图像等既是载体,也是信息的表达技术 D、算术运算和逻辑运算是计算机处理信息的基本运算
-
16、某字符串加密算法,规则如下:
1)根据字符串长度构建一个最小的n*n矩阵,将字符串中每个字符从左到右,自上而下顺序填入矩阵,不足部分用字符“*”代替;
2)将矩阵转置(行列对换),然后将奇数行字母内码加上1,偶数行字母内码减1,字符为a、z或A、Z时做循环处理。比如,字符a减1为z;字符Z加1为A。
3)按从左到右,从上而下依次取出字符,形成新的字符串。如图a为字符串“Go to the zoo.”的加密过程。编写VB程序,在文本框Text1中输入字符串,点击“加密”按钮,在文本框Text2中输出加密后的字符串。程序运行结果如图b所示。
图a
图b
(1)、若在文本框Text1中输入3个字母“Far”,执行加密程序后,输出结果为。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码Dim a(1 To 100) As String, b(1 To 100) As String, n As Integer
Private Sub Command1_Click()
Dim s1 As String, s2 As String,i As Integer, j As Integer, m As Single
s1 = Text1.Text
m = Sqr(Len(s1))
If m > Int(m) Then n = Int(m) + 1 Else n = m
For i = 1 To n * n
If i <= Len(s1) Then a(i) = Mid(s1, i, 1) Else a(i) = "*"
Next i
For i = 1 To n
For j = 1 To n
b((i - 1) * n + j) = ‘将矩阵转置
b((i - 1) * n + j) = jm(i, j) ‘内码变换
Next j
Next i
s2 = ""
For i = 1 To n * n
s2 = s2 & b(i)
Next i
Text2.Text = s2
End Sub
Function jm(x As Integer, y As Integer) As String
Dim s As String
s = b((x - 1) * n + y)
If s <= "Z" And s >= "A" Or s <= "z" And s >= "a" Then
If x Mod 2 <> 0 Then
If s <> "Z" And s <> "z" Then
s = Chr(Asc(s) + 1)
Else
s = Chr(Asc(s) - 25)
End If
Else
If s <> "a" And s <> "A" Then
s = Chr(Asc(s) - 1)
Else
s =
End If
End If
End If
End Function
-
17、某比赛项目由多位评委打分,然后根据项目难度系数计算最终得分。规则为:
最终得分=(所有评委打分总和-1个最高分-1个最低分)×项目难度系数
编写VB程序,实现计算最终得分的功能。在文本框Text1中输入项目难度系数和多位评委的打分,中间用“,”隔开并以“,”结尾,然后点击计算按钮,在文本框Text2中显示最终得分。程序运行界面如图所示。
(1)、程序中计算按钮的对象名是 (单选,填字母:A .Command1/B .Cmd1/C .Cmd1_Click)。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Private Sub Cmd1_Click()
Dim a(1 To 100) As Single
Dim i As Integer, j As Integer, k As Integer, m As Integer, n As Integer
Dim Tot As Single, tmp As Single
Dim s As String, v As String, ch As String
s = Text1.Text
n = 1:v=""
Do While n <= Len(s)
ch = Mid(s, n, 1)
If ch <> "," Then
v = v & ch
Else
a(m) = Val(v)
m = m + 1
End If
n = n + 1
Loop
For i = 2 To m - 2
For j = m - 1 To i + 1 Step -1
If a(i) < a(j) Then
tmp = a(i): a(i) = a(j): a(j) = tmp
End If
Next j
Next i
Tot = 0
For

Tot = Tot + a(i)
Next i
Text2.Text =
End Sub
(3)、程序中加框处代码有错,请改正。 -
18、用Flash软件打开“昆虫世界.fla”文件,部分编辑界面如图a所示。
图a
请回答下列问题:
(1)、创作多媒体作品时需要对背景音乐进行处理,用Goldwave软件打开声音文件,界面如图b所示。下列描述正确的是 (多选,填字母)。
图b
A、当前处理的声音素材为Wav格式立体声 B、当前状态执行“删除”命令后,保留的声音时长为1分50秒 C、当前状态执行“剪裁”命令后,保留的声音时长为40秒 D、当前状态下执行“淡入”命令后直接保存,音频文件存储容量与原来一样 E、当前状态下执行“静音”命令后直接保存,音频文件存储容量将减少(2)、测试影片时,本场景播放结束后,蝴蝶还在扇动翅膀,声音还在继续播放,可知“蝴蝶”的元件类型为 , “背景音乐”图层中声音的同步类型为。(选填:事件/数据流)(3)、甲虫动画脚本为:沿树干上爬→左转→沿树枝左爬→变“昆虫”文字。若要将“世界文字”动画与甲虫变昆虫动画同步,则在“世界文字”图层中应进行的操作是。(4)、测试影片时,单击当前场景中的“浏览”按钮,停止所有声音播放,同时在浏览器中显示出位于同一目录下的“kunchong.txt”文件内容,则“浏览”按钮的动作脚本为on(release){} -
19、网上下载了第六次人口普查的相关数据,并用 Excel软件进行数据处理,如图a所示。
图a
请回答下列问题:
(1)、区域 E4:G14的数据是通过公式计算得到的,在E4单元格中输入公式 , 再使用自动填充功能完成区域E5:E14和F4:G14的计算。(提示:占总人口比重=年龄段人口数÷总计人口数×100)
(2)、对图a所示表格中数据按“性别比”降序排列,则应选择的数据区域为。(3)、利用图a数据建立了“各年龄段人口比重”饼图,如图b所示。下列说法正确的是 (多选,填字母)。
图b
A、可以通过数据区“A4:B14”创建该图表 B、可以通过数据区“A4:A14,E4:E14”创建该图表 C、隐藏“0-9岁”所在行数据,图表不会发生变化 D、调整数据表中小数点位数,图表不会发生变化 -
20、有如下 VB 程序段:
s = "AAABBBCCCCDDEFF"
i = 1: j = Len(s): Key = "H": v = ""
Do While i <= j
m = (i + j) \ 2
c = Mid(s, m, 1)
If c = Key Then Exit Do
If c > Key Then
j = m - 1: v = v & c
ElseIf c < Key Then
i = m + 1: v = v & c
End If
Loop
执行完以上程序后,v的值为( )
A、CDFF B、CDF C、CDEF D、DEF