相关试卷
-
1、超市管理应用系统是利用( )存储、管理大量数据的。A、数据链 B、数据集 C、数据项 D、数据库
-
2、通过网络漫游故宫博物院，如身临其境般进入展区、观看展品，采用的是( )。A、流媒体技术 B、虚拟现实技术 C、人工智能技术 D、模拟识别技术
-
3、数据库管理系统中对数据信息的操作( )。A、速度快、效率高 B、速度快、效率低 C、速度慢、效率高 D、速度慢、效率低
-
4、对全校教师的基本信息进行管理时，速度从慢到快的依次是( )。A、文件管理、手工管理、数据库管理 B、手工管理、文件管理、数据库管理 C、手工管理、数据库管理、文件管理 D、数据库管理、文件管理、手工管理
-
5、利用编程解决问题一般过程分四个步骤，“分析问题”后的下一个步骤是( )A、设计算法 B、调试运行 C、编写程序 D、得到答案
-
6、我们的电脑既能听音乐又能看影视节目，这是利用计算机的( )。A、文字处理技术 B、多媒体技术 C、人工智能技术 D、自动控制技术
-
7、在Word的菜单中，有一些命令是暗淡的，这表示( )。A、系统运行出故障 B、应用程序本身有问题 C、这些命令在当前状态中暂时不起作用 D、这些命令在当前状态下有特殊效果
-
8、下列不属于智能信息处理工具的选项是( )。A、计算机下棋 B、在线翻译 C、手写识别 D、手工绘图
-
9、在Excel的单元格中，要输入一列连续的数字，最简单的方法是( )。A、填入第一个数据后用复制、粘贴命令填充剩余的单元格 B、填入第一个数字后拖动鼠标 C、填入第一个数字后，利用填充柄自动填充 D、逐一输入数据
-
10、用下列哪种工具软件处理数码像机采集的图片比较恰当( )。A、Thunder B、Word C、Photoshop D、FrontPage
-
11、关于网络信息下载，下列说法中正确的是( )。A、网页上只有文字信息可以下载，多媒体信息无法下载 B、用复制、粘贴的方法可以下载任何网络资源 C、网页只能以html的形式保存下来 D、可以使用下载工具软件进行网络资源的下载
-
12、对于网络上如影片这类容量比较大的文件，下列哪种方式下载更恰当( )。A、在浏览器窗口文件菜单下选择“另存为” B、网页上点击鼠标右键，选择“目标另存为” C、使用下载工具软件进行下载 D、通过“复制”“粘贴”的方式
-
13、某同学在百度搜索栏中输入“德尔塔”，了解到此新冠病毒变异毒株发现于印度，这种信息检索方式属于( )。A、专业垂直搜索 B、目录搜索 C、分类搜索 D、关键词查询
-
14、张扬的儿子今年小学毕业，想了解某知名初中的招生信息，以下最恰当的方式是( )A、通过百度搜索 B、新浪网 C、四川省教育厅官方网站 D、该校网站招生宣传栏目
-
15、小宇用上网查找的方式，获取到“成都轨道交通资阳线”相关信息，这属于信息获取过程中的哪个环节( ) ？A、评价信息 B、确定信息获取方法 C、选择信息来源 D、确定信息需求
-
16、通过询问他人获得信息的方法属于( )。A、调查法 B、实验法 C、观察法 D、访谈法
-
17、今年卢旺达驻华大使直播带货火爆，代言数千斤咖啡豆，上架秒空。这主要是哪种技术带来的变化( )。A、种植技术 B、现代信息技术 C、生物技术 D、识别技术
-
18、中国古代四大发明中的造纸术和印刷术是( )信息技术革命的标志。A、第一次 B、第二次 C、第三次 D、第四次
-
19、某会务组根据参会者提交的入住宾馆和到达指定上车点时间的信息，安排车辆接送参会者去宾馆。不同宾馆的参会者分开接送，同一宾馆的参会者可同乘一辆车，每辆车最多接送v人，每个参会者的等待时间都不超过w分钟。参会者人住的宾馆和到达上车点的时间用长度为7的字符串表示，例如“A-09：15”表示参会者当天入住A宾馆，9点15分到达上车点，如果w为10，那么该参会者最晚9点25分出发：去宾馆。
编写VB程序，统计接送n个参会者所需的最少车辆数。运行程序，列表框List1中按入住宾馆分组显示所有参会者提交的信息，同一宾馆的按时间先后排列。单击“统计”按钮Command1，在文本框Text1中显示所需的最少车辆数。程序运行界面如图所示。
(1)、如图所示，如果每辆车最多接送4人，每个参会者的等待时间不超过10分钟，接送所有到A宾馆的参会者最少需要辆车。(2)、实现上述功能的部分VB程序如下，请在划线处填入合适的代码。'n、v、w是常量
'n为参会人数，v为每辆车最多接送人数，w为参会者最长的等待时间，代码略
Private Sub Form_ Load()
'读取n个参会者提交的信息，依次存入a(1)~a(n)
'将a(1)~a(n)接入住宾馆分组，同一宾馆参会者按时间先后排序
'并在List1中显示，代码略
End Sub
Private Sub Commandl_Click()
Dim i As Integerj As Integer, sum As Integer
a(n+1)=" "
j=1： sum = 0
For i-2 To n+ 1
If Mid(a(i), 1, 1)< Mid(a(j),1,1)Then
j=i
End If
Next i
Text1. Text = Str(sum)
End Sub
Function getDif(tsl As String， ts2 As String) As Integer
'返回ts1到ts2的时长(单位：分钟)，代码略
'例如ts1为"08：30"，ts2 为"08：35"，则返回的函数值为5
End Function
Function getCnt(first As Integer, last As Integer) As Integer
Dim s1 As String, s2 As String
Dim iAs Integer, p As Integer, k As Integer,t As Integer
p= first：k= 1
s1 = Mid(a(first), 3, 5)
For i= first+1 To last
s2 = Mid(a(i), 3, 5)
t= getDif(s1, s2)
If Then
k=k+1
p=i
End If
Next i
getCnt= k
End Function
-
20、某校以投票方式评选优秀作品，每张选票仅填一个作品编号，得票数过半的获最具人气奖。小李和小王收集了全部选票，其中小李已将收集的选票按作品编号非降序排序，小王收集的选票未排序。现要求将全部选票按作品编号非降序排序，找出获最具人气奖的作品编号。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示全部选票，小李收集的选票在前，小王收集的选票在后。单击“分析”按钮Command1，在列表框List2中按作品编号非降序显示全部选票，在文本框Text1中显示最具人气奖的作品编号。程序运行界面如图所示。
(1)、类生成的对象没有Caption属性(单选，填字母： A . Label 1 /B . ListBox 1/C . CommandButton)。(2)、实现上述功能的部分VB程序如下，请在划线处填入合适的代码。'm和n是常量，代码略
Dim a(l To n) As String，c(1 To n) As String
Private Sub Form_ Load( )
'将n张选票的作品编号存入数组a，在List1中显示，代码略
'a(1)~ a(m)、a(m+1)~ a(n)分别为小李和小王收集选票的作品编号
End Sub
Private Sub Command1_ Click()
Dim iAs Integer， j As Integer， k As Integer， t As String
For i=m+ 1To n-1
For j=n- 1 To i Step-1
If a(k) < a(i) Then t= a(j)： a(j)= a(k)： a(k)=t
Next j
Next i
i= 1
For k=1 To n
If j> n Then
c(k)=a(i)i=i+1
Elself Then
c(k)=a(i)ti=i+ I
Else
c(k)=a()：j=j+ 1
End If
List2. Addtem c(k)
Next k
Text1.Text = "无"
For i=
If c(i)=c(i+n \ 2) Then
Text1.Text = c(i)： Exit For 'Exit For表示退出循环
End If
Next i
End Sub
(3)、程序中加框处代码有错，请改正。