相关试卷
-
1、小许收集了2011年至2018年全国各级各类学历教育招生数数据,并使用Excel软件进行了数据处理。如图a所示,请回答下列问题:
图a
(1)、如图a所示,若因误操作在“普通本科”和“普通专科”两列之间插入一个空白列,图中原R7单元格的计算公式(=Q7/$Q$12)将(选填:A .保持原公式不动! B .显示#REF! C .公式变为=R7/$R$12 D .公式变为=R7/$Q$12)。(2)、在对“8年合计”行进行由B12单元格自动向右填充的时候漏了“技工学校”这一单元格。小许的做法是,对B12单元格进行复制,然后在P12单元格上右键,选中如图b所示的第三个fx按钮。操作结束后,选中P12单元格,此时公式编辑栏中显示的内容为。
图 b
(3)、下列说法或操作正确的是________________(多选,填字母)
图c
A、Q12单元格显示“#######”的问题,是因为P12单元格为空造成的。 B、小许想知道“每年招生占8年招生比重”的最小年份,他选择A4:R11作为排序区域(按图c操作),列R为主要关键字,进行升序排序,排在第一个的就是。 C、小许想筛选出普通本科招生人数大于400万人的年份,他的操作是:将A1:R11数据复制到新工作表中,选中D3:D11区域,然后点击筛选按钮并按要求进行条件筛选。 D、小许对列R进行最小10%筛选,虽然结果计算出来不满1个,但是还是能筛选出一个结果。 E、先对博士列进行大于等于7,再对网络专科列大于等于150,和先对网络专科列大于等于150,再对博士列进行按大于等于7进行筛选,两个结果是一样的。 -
2、某对分查找算法的VB程序段如下:
Dim a(1 To 10) As Integer
Key = Int(Rnd * 32) * 3 + 3
s = 0: i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key = a(m) Then Exit Do
If Key > a(m) Then
i = m + 1: s = 3 * s + 2
Else
j = m - 1: s = 3 * s
End If
Loop
数组a(1)到a(10)的值依次为“4,7,9,15,24,32,37,54,75,90”,执行该程序段后,s的值不可能为( )
A、20 B、80 C、62 D、18 -
3、数组a中存储了无序的数组元素,为了使a数组中的元素存储为左右交替上升,小赵依据选择排序思想设计了如下VB程序算法,为了实现上述功能,划线处应填入的代码为( )
L = 1: R = n
Do While L < R
imin_1 = L: imin_2 = R
For i = L + 1 To R
If a(i) < a(imin_1) Then
imin_2 = imin_1
imin_1 = i
ElseIf a(i) < a(imin_2) Then
imin_2 = i
End If
Next i
If imin_1 <> L Then t = a(imin_1): a(imin_1) = a(L): a(L) = t
____________________
If imin_2 <> R Then t = a(imin_2): a(imin_2) = a(R): a(R) = t
L = L + 1: R = R - 1
Loop
A、If imin_1 = L Then imin_1 = imin_2 B、If imin_1 = L Then imin_2 = imin_1 C、If imin_2 = L Then imin_1 = imin_2 D、If imin_2 = L Then imin_2 = imin_1 -
4、有如下VB程序段
Dim c As String, s1 As String
s = Text1.Text
s1 = ""
For i = 1 To Len(s)
c = Mid(s, i, 1)
If c >= "A" And c <= "Z" Then c = Chr((Asc(c) - Asc("A")) Mod 10 + Asc("0"))
If c >= "4" And c <= "9" Then c = Chr(Asc(c) - Asc("4") + Asc("a") + 1)
s1 = c + s1
Next i
Text2.Text = s1
在文本框Text1中输入“ELQ278yza ”,执行上述程序后,文本框Text2中输出( )
A、b1d2efyza B、4162efyza C、azyfe2d1b D、azyfe2614 -
5、下列关于VB对象的描述中,不正确的是( )A、一个对象的状态是通过若干个属性来描述的 B、每个对象都有自己的行为,即对属性进行操作和处理的方法 C、对象事件的发生会驱动该对象相应事件处理过程的执行 D、不同对象的属性与方法一定不相同
-
6、某算法流程图如图所示,若输入m和n的值分别为24和9,执行这部分流程后,变量m的值为( )
A、3 B、6 C、9 D、1 -
7、生成10到50之间随机奇数,如果用随机函数Rnd产生这个数,下列表达式正确的是( )A、Int(Rnd*20)*2+10 B、Int(Rnd*20)*2+11 C、Int(Rnd*40)+11 D、Int(Rnd * 2 + 1) * 25
-
8、下列有关信息编码说法,不正确的是( )A、处理码是计算机内部用于信息处理的汉字代码,也称汉字机内码 B、黑白照片一类的单色的灰度图像,每个像素用一位二进制表示 C、某十六进制数n的末位是“0”,去掉该“0”后,所得的值为n/16 D、通过“采样”和“量化”可以实现声音由模拟信号向数字信号转变
-
9、某校建设了校园一卡通系统,采集的学生信息存储在“学生一卡通信息”数据表中,
数据表结构及记录分别如1图和2图所示,选择右键菜单中的“新记录”并输入相应数据,下列可能作为新记录的是( )
A、2 0025026 张凯 是/否 2000-11-19 622 湖州湖畔小区 B、2 2125311 李军 男 1999/12/15 623 湖州爱华小区 C、9 2015121 赵欣 是/否 2000/11/25 629 湖州临海小区 D、7 2015368 王晓 女 2000\09\17 598 湖州太湖小区 -
10、某用户编辑界面如题图所示:

下列说法正确的是( )
A、文档中有2个用户添加了批注 B、文档中做了2处修订 C、图片的文字环绕方式为四周型 D、第一行文字拒绝全部修订后显示为:诗歌从春鸟地啼鸣、春风春雨地吹打、春花的谢落等声音,让我们通过听觉, -
11、下列应用中,体现了人工智能技术的有( )A、装有传感器的“智能小车”,自动沿着黑线路径行驶 B、疫情期间,“健康码”是以真实数据为基础,生成属于个人的二维码 C、“口袋动物园”是一款基于AR(增强现实)技术的儿童启蒙教育APP,可以让立体的、活生生的动物呈现出来 D、“世界很复杂,百度更懂你”,百度识图可以实现用户上传图片并在互联网上搜索与该图片相似的其他图片资源
-
12、下列说法不正确的是( )A、计算机存储数据的基本单位是Byte B、德国数学家莱布尼兹提出了二进制记数系统 C、声音、形体动作、多媒体技术等都属于信息表达技术 D、信息具有真伪性,如“管中窥豹”是源于对信息片面的感知与理解
-
13、数塔问题。一组数字构成如题图a所示的数塔,从数塔顶层出发,每个结点可以选择移动至左下方或右下方结点,一直走到塔底为1条路径。求从数塔顶层到塔底各条路径上数字和的最大值。
解决此问题可采用自底至顶分析的方法。如图a所示的数塔中,先从第3层开始分析:
如果路径经过第3层的第1个数字12,那么从12到尾结点的路径上数字之和的最大值是当前结点值加上该结点左下方、右下方结点中的较大值,记作f(3,1)=12+14;同理,f(3,2)=7+15、f(3,3)=26+15;再分析第2层,计算f(2,1)、f(2,2);最后计算出第1层f(1,1),即为所求结果。
(1)、如图a所示数塔各条路径上的数字和的最大值为 。(2)、编写VB程序,运行界面如图b所示,程序代码如下,请在划线处填入合适的代码,将程序补充完整。Const n = 5
Dim a(1 To n^2) As Integer '数组a存储数塔数据,存储结构如图c所示
Dim f(1 To n^2) As Integer '数组f存储从第i层第j个数到底层尾结点的最大数字之和,其存储结构与数组a一样
Private Sub Command1_Click()
′生成数塔,将数据存入a数组中,代码略
End Sub
Private Sub Command2_Click()
Dim i As Integer, j As Integer, k As Integer
For j = 1 To n
f((n - 1) * n + j) = ①
Next j
For i = ②
For j = 1 To i
k = (i - 1) * n + j
f(k) = ③
Next j
Next i
Label1.Caption = "路径上的数字和最大值为:" + Str(f(1))
End Sub
Function max(a As Integer, b As Integer) As Integer
If a > b Then max = a Else max = b
End Function
① ② ③
-
14、编写“区间覆盖”程序,实现如下功能:输入数轴上的若干个封闭区间范围(均为正整数且左 坐标 < 右坐标),单击“统计”按钮,计算覆盖所有区间所需的数据点的个数。
例如:依次输入以下区间:[2 5],[4 7],[1 4],[5 9],[4 5],[2 4],数轴如下:
坐标点“4”覆盖了[2 5],[4 7],[1 4],[4 5],[2 4]共5个区间,坐标点“9”覆盖了[5 9]区间,所以覆盖这6个区间所需的坐标点数为2个。 程序运行界面如图所示。实现上述功能的VB代码如下:
Dim n As Integer
Dim a(1 To 100) As Integer
Private Sub Input_Click()
'输入n个正整数区间,依次存放到数组
'a(1)到 a(2*n)中,并在List1中显示
'代码略
End Sub
Private Sub Count_Click()
Dim right As Integer, t As Integer, k As Integer
Dim tmp As Integer, i As Integer, ans As Integer
tmp = a(k): a(k) = a(t): a(t) = tmp
tmp = a(k + 1): a(k + 1) = a(t + 1): a(t + 1) = tmp
End If
Next i
‘改错 ans = 1: t = 3
Do While t < 2 * n
If ① Then
If a(t + 1) < right Then right = a(t + 1)
Else
ans = ans + 1
right = a(t + 1)
End If
②
Loop
Text3.Text = Str(ans)
End Sub
请回答下列问题:
(1)、根据程序可知,“统计”按钮的对象名为 。(2)、根据虚线框中算法可知,如示例所示输入的数据[4 7]和[4 5],在排序后,这两组数据在数组 中的前后位置顺序是否发生改变? 。(填:是/否)(3)、程序中加框处代码有误,请改正。(4)、请在划线①②处填入合适的代码。① ②
-
15、某同学使用Flash软件创作了以“重阳节”为主题的多媒体作品,其制作脚本如下表,作品的Main场景如图所示,请回答下列问题:

(1)、在作品制作前进行了一系列准备工作,其中属于创作需求分析的是(多选,填字 母:A .将作品定位为演示型/B .把作品大致规划为“片头”、“主交互界面”、“片尾”三大 部分/C .最后将作品以 exe 文件的形式发布/D .分析并确定制作该作品需要用到的软硬件 /E .分析该作品主要面向的人群)
(2)、“菊花”图层中的补间动画是利用库中“菊花”元件制作的,当动画播放完毕停留在最后一 帧时,该元件实例的动画依然持续,则该实例的元件类型是 。(3)、根据制作脚本描述,“文字2”图层第45帧的元件实例的Alpha属性值应设置为 。(4)、测试Main场景,发现某图层的动画效果与制作脚本描述不符,应做的调整操作为。(5)、根据制作脚本描述,应在“重播”按钮上设置的动作脚本为 。
-
16、小王收集了本校高一选修课满意度调查数据,并用Excel软件进行数据处理,如图a所示。请回答下列问题:

图 a
(1)、各门选修课的满意率数据是在H4单元格输入公式后,利用自动填充功能得到的,则H4单元格输入的公式是 。(满意率:是指该门课“非常满意”和“满意”的评价人数之和除以评价总人数)(2)、由于“航模运动基础”这门课最终 未开设,因此没有各项数据,自动填充完成后,H7单元格显示的内容为(填字母:A .#DIV/0! B .#REF! C .#VALUE! D .— )。(3)、为了更加直观地比较满意率情况,小王制作了如图b所示的图表,创建该图表的数据区域是。
图 b
(4)、若对表格中数据进行自定义筛选,设置的筛选条件如图c所示,则图b所示的图表中将显示(填数字)项数据。

图 c
-
17、某同学设计了一个排序算法,先将数组a中奇数位置的元素、偶数位置的元素分别进行排序,然后再进行后续处理,直至所有元素按降序排列。算法的VB程序段如下:
′待排序数据已存储在数组a中(a(1)~a(n))
For i = 1 To n - 2
k = i
For j = ′①
If a(j) > a(k) Then k = j
Next j
If k <> i Then t = a(i): a(i) = a(k): a(k) = t
Next i
For i = 1 To n \ 2
j = 2 * i - 1
If a(j) < a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t
Next i
For i = ′②
t = a(i): j = i - 1
Do While t > a(j)
a(j + 1) = a(j): j = j - 1
Loop
′③
Next i
上述程序段中 3 处方框处的代码分别为 ( )
A、①i+1 To n Step 2 ②2 To n Step 2 ③a(j+1)=t B、①i+2 To n Step 2 ②3 To n Step 2 ③a(j+1)=t C、①i+2 To n Step 2 ②2 To n Step 2 ③a(j)=t D、①i+1 To n Step 2 ②3 To n Step 2 ③a(j)=t -
18、有如下VB程序段:
i = 1: j = 9: flag = False
Key = Val(Text1.Text)
Do While i < j
m = (i + j + 1) \ 2
If a(m) > Key Then j = m - 1 Else i = m + 1
If a(m) = Key Or a(m + 1) = Key Then flag = True: Exit Do
Loop
If flag Then
If a(m) = Key Then Text2.Text = Str(m) Else Text2.Text = Str(m + 1)
Else
Text2.Text = "找不到"
End If
程序运行时,数组元素a(1)到a(9)中的数据为12,24,27,34,39,46,68,73,84,在文本框Text1中输入“68”,执行该程序段,则下列表达式正确的是( )
A、j=8 B、i=8 C、j=9 D、m=6 -
19、有如下 VB 程序段:
For i=1 To 100
For j=i To 100
If j Mod i = 0 Then a(j)=a(j)+1
Next j
Next i
Text1.Text=Str(a(30))
数组a各元素的初值为0,执行上述程序段后,文本框Text1中输出的内容为 ( )
A、30 B、9 C、8 D、7 -
20、有如下 VB 程序段 :
Dim i As Integer
Dim a(1 To 9) As Integer
a(1) = 1: a(2) = 2
For i = 3 To 10
a(i) = a(i - 1) * i
Next i
Text1.Text = Str(a(i))
运行程序,单击命令按钮Command1后,出现的错误提示为( )
A、下标越界 B、溢出 C、子程序或函数未定义 D、类型不匹配