相关试卷
-
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、某会务组根据参会者到达指定上车点时间和每位参会者可以等待的时间信息,安排车辆接送参会者去宾馆(不考虑车子座位数量)。参会者到达上车点的时间和可以等待的时间用长度为7的字符串表示,例如“08:12 2”表示参会者当天8点12分到达上车点,最多等待2分钟(每个人的等待时间都小于10),那么该参会者最晚8点14分出发去宾馆。
编写VB程序,统计接送n个参会者所需的最少车辆数。运行程序,列表框List1中显示所有参会者提交的信息,按到达时间先后排列。单击“统计”按钮Command1,在文本框Text1 中显示所需的最少车辆数。程序运行界面如图所示。
(1)、如图所示,接送所有参会者最少需要辆车(2)、实现上述功能的部分VB程序如下,请在划线处填入合适的代码。Dim n As Integer
Dim a(1 To 100) As String
Dim b(1 To 100) As Integer
Dim c(1 To 100) As Integer
Dim fg(1 To 100) As Boolean
Private Sub Form_Load()
'读取n个参会者提交的信息,依次存入a(1)~a(n)
'将a(1)~a (n)按参会者到达时间排序,并在List1中显示,代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As String
Dim sum As Integer, q As Integer
For i=1 To n
b(i) = T(Mid(a(i), 1, 5))
c(i) = b(i) + Int Mid(a(i), 7, 1))
For j=1 To 2 Step-1
k=
If c(k) > c(j) Then
q=b(k):b(k)=b(j):b(j)=q
q=c(k):c(k)=c(j):c(j)=q
Else
Exit For
End If
Next j
Next i
sum=0
For i=1 To n
If fg(i) = False Then
For j=1 To n
If Then
fg(j) = True
End If
Next j
End If
Next i
Text1.Text = str (sum)
End Sub
Function T(str1 As String) As Integer
T = Int(Mid(str1,1, 2)) * 60 + Int(Mid(str1, 4, 2))
End Function
-
7、某学校开展了艺术节活动,数组a中存储了n个节目的编号和得分数据,数组存储结构如下图所示:

小明使用选择排序思想对上述n个节目按得分进行降序排序(得分相同的按编号升序排列),并依据得分插入各个节目的排名信息,处理后数组a的存储结构如下图所示:

程序运行时,单击命令按钮Command1后读取数据到数组a中并显示在列表框List1中,单击命令按钮Command2后将节目按照上述规则进行排序,并将排名结果显示在列表框List2中。实现上述功能的VB程序如下,请回答下列问题:
(1)、已知窗体名称为Form1,要使程序加载时,窗体标题自动显示为“第15题程序”,则可在(单选,填字母:A .Form_ Click() / B .Form Load() / C .Form1_ Click() / D .Forml_ Load()) 事件过程中添加代码: Form1. Caption= "第15题程序"。(2)、请在划线处填入合适的代码。Const n = 20
Dim a(1 To 3 * n) As Integer
Private Sub Command1_Click ()
‘读取数据,存储在数组a中,并显示在列表框List1中。代码略
End Sub
Private Sub Command2_Click ()

k=i
For j=1 To i-1
If a(2*j) < a(2*k) 0r Then
k=j
End If
Next j
a(3*i)=a(2*k)
a(3*i-1)=a(2*k-1)
a(2*k-1)=a(2*i-1)
Next i
List2. AddItem "第1名:编号”+ CStr(a(2)) + ",分数”+ Str(a(3))
a(1) =1
mc=1
For i=2 To n
If Then mc=i
List2. AddItem "第"+ Str(mc) + "名:编号" + CStr(a(3* i-1)) +",分数"+Str(a(3 * i))
a(3*i-2)=mc
Next i
End Sub
(3)、加框处代码有误,请改正。 -
8、小宇制作主题为“大美山河”的多媒体作品,部分界面如图a所示。请回答下列问题:
(1)、下列有关多媒体作品设计的说法,正确的有 (多选:填字母)。A、文字脚本可以作为多媒体作品制作的直接依据 B、确定作品中所用素材获取方式属于脚本编写中的媒体元素分解 C、了解整个作品的组成部分、工作流程和主要界面,可查阅其系统结构设计报告 D、作品的社会效益和经济效益属于创作需求分析 E、多媒体作品设计的过程包括需求分析、规划设计、脚本编写(2)、“树”图层第1帧使用了元件“大树”,该元件的部分编辑界面如图b所示,该元件可能是通过导入下面哪个文件达到效果的(单选,填字母:A .风车.jpg/B .蝴蝶.mpg/C .蝴蝶.gif)
(3)、为使“声音”图层中的声音和画面同时结束,可将声音的同步方式设置为(填:数据流/事件/开始)。(4)、如图a所示,“云朵”图层制作了云朵淡入的动画补间,补间错误的原因可能是(5)、测试影片,单击“重播”按钮后跳转到“河流”场景并停止在第10帧,则该按钮上添加的动作命令为 -
9、小陈收集了近三年某地各景区游客相关数据,并使用Excel软件进行处理,如图a所示。
(1)、区域H3:J5中的数据是通过SUMIF函数计算得到的,则在H3中应输入公式 , 再通过自动填充完成H列、I列、J列的相关计算(提示: SUMIF 函数用于统计某个区域中满足条件的单元格数值之和,例如,求2019年正常购票游客人数:=SUMIF(A3:A11,G3,C3:C11)(2)、根据图a中的数据,制作一张近3年景区游客统计情况图,如图b所示,则该图表的数据区域是
(3)、对图a中的数据进行统计,下列说法正确的有 (多选,填字母)。A、若要按各景区的“总人数”进行降序排序,则排序时应选择的数据区域是A2:E11 B、选中A2:E11按照总人数降序排序后,图b的图表发生改变 C、以“年份”等于“2019年”,“总人数” 最小一项进行筛选,可以筛选出“2019年”中“总人数”最小的记录 D、在图a中,以“*A"对“景区名称"列进行筛选,可筛选出所有景区A的数据 -
10、有如下VB程序:
Dim a(0 To 7) As Integer
a(0)=1:a(1)=1:a(2)=2:a(3)=2:a(4)=2:a(5)=3:a(6)=3:a(7)=5
i = 0:j=7:n=0
Key=Int(Rnd*7)
Do Whilei <=j
m=(i+j+1)\2
If a(m) = Key Then
Exit Do
ElseIf a(m) < Key Then
i=m+1:n=n-1
Else
j=m-1:n=n+1
End If
Loop
Print (n)
执行该程序,输出结果可能的是( )
A、3 B、1 C、-4 D、2 -
11、有如下VB程序:
Dim s1 As String, s2 As String, n As Integer, t As Integer
Dim a(128) As Integer
s1 = Text1. Text : n = Len(s1)
s2 =""
For i=1 To n
t = Asc(Mid(s1, i, 1))
a(t)=a(t)+1
Next i
For i=1 To 128
Do While a(i)> 0
s2 = s2 + Chr(i)
a(i)=a(i)-1
Loop
Next i
Text2.Text = Mid(s2,5,1)
若Text1中输入的字符串为“He1lo535Study" (不包括引号) ,运行上述程序后,Text2中显示的结果为( )
A、o B、e C、S D、5 -
12、有如下VB程序:
Dim a(5) As Integer
Dim i As Integer, j As Integer, k As Integer
For i=0 To 5
a(i) = (Int(Rnd()*5)+1)*2+(iMod 2)
Next i
For i=2 To 5
j=i
k = a(j)
Do While a(j-1)<k And j>1
a(j)=a(j-1)
j=j-1
Loop
a(j) = k
Next i
执行以上程序后,数组a可能的值是( )
A、10,9,8,7,7,5 B、9,10,9,9,7,4 C、9,9,8,7,4,2 D、8,11,8,5,4, 3 -
13、有如下VB程序段:
s =Text1.Text
For i =1 To Len(s)
For j=1 To Len(s)-i+1
List1. AddItem Mid(s, i, j -i+ 1)
Next j
Next i
在Text1中输入“abc”(不包括引号),执行上述程序段后,List1中前三行的内容为( )
A
B
C
D
a
ab
abc
c
bc
abc
abc
ab
a
abc
bc
c
A、A B、B C、C D、D -
14、某算法的部分流程图如图所示。执行这部分流程,分别输入45、50、55,则输出值依次为( )
A、6,5 B、5,7,7 C、6,7 D、6,7,7 -
15、下列VB表达式中,能随机产生10至100之间的奇数的是( )A、Int(Rnd * 90) + 10 B、Int(Rnd * 90) + 11 C、Int(Rnd *45) * 2 + 10 D、Int(Rnd *45) *2+11
-
16、某音频文件的部分参数信息如图所示,在当前状态下,执行删除操作后,文件的容量约为( )
A、3.36MB B、6.73MB C、10.09MB D、20.18MB -
17、用Photoshop软件制作“防疫宣传”作品,部分编辑界面如图所示。下列说法正确的是( )
A、可以修改“标题”图层名为“宣传语” B、隐藏“树叶”图层,“半圆” 图层也会隐藏 C、“众志成城”图层设置了“波纹”滤镜效果 D、可以把“众志成城”图层的图层样式复制到“背景”图层 -
18、下列关于编码的说法中不正确的是( )A、编码是按照某种规则或格式,从一种形式转换为另一种形式的过程 B、数据有很多表现形式,但最终存储在计算机中的都是经过一定规则编码后的二进制数据 C、wav、mp3、wma等是常见的音频编码方式,avi、mp4、wmv等是常见的视频编码方式 D、对信息编码,相同位数的八进制数比十六进制数能编更多的码
-
19、用Access打开某数据库文件,部分界面如图所示:
下列说法正确的是( )
A、“info”是所打开数据库的名称 B、“Birthday”字段中不能输入“1982年2月16日” C、若删除数据表中第1条记录,则后面所有记录的ID值自动发生调整 D、“eMail”字段的数据类型既可以设置为“文本”,也可以设置为“备注” -
20、下列关于网络和协议的说法正确的是( )A、IE浏览器不仅可以用来解释HTML代码,也可以用来编辑和保存网页 B、www协议负贵web网站和浏览器之间的信息交互 C、网页中三种基本的元素为:文字、图形图像和超链接 D、可利用浏览器中的收藏夹保存网页内容