相关试卷
-
1、历史故事“明修栈道,暗渡陈仓”说明了信息具有( )A、价值性 B、共享性 C、时效性 D、真伪性
-
2、下列关于信息特征的叙述,不正确的是( )。A、信息可以被多个接收者接收并可重复使用 B、人们接收到的信息并非都有价值 C、信息的价值永远存在 D、信息必须依附一定的载体才能够表现出来
-
3、全国各族人民通过网络、电视收看国庆七十周年庆典节目,感受祖国的繁荣和富强。这一事例主要表明信息具有( )A、传递性、共享性 B、传递性、真伪性 C、共享性、时效性 D、真伪性、时效性
-
4、超市门口LED屏滚动显示当天的蔬菜价格信息,其信息的主要载体是( )A、文字 B、声音 C、颜色 D、文件
-
5、下列选项中,属于信息范畴的是( )A、电视节目预告 B、《读者》杂志 C、《春节晚会》视频光盘 D、电视台播音员
-
6、在一个数组中存储了若干个同学的技术成绩小题分,其中a(1)存储学生个数,a(2)开始按顺序存储小题分数据。每个学生有33个小题的数据,例:a(2)~a(13)是学生1的信息选择题得分,a(27)~a(30)是学生1的信息4个主观题得分。具体如下表
题号
1-12
13-25
26-29
30-33
科目题型
信息客观题
通用客观题
信息主观题
通用主观题
满分分值
每题2分
每题2分
4/8/7/7
6/9/3/6
小李根据上述描述,设计了一个统计所有同学信息各题得分率的算法。程序运行后首先在列表框list1显示信息技术各小题得分,单击“计算”按钮“command1”,在列表框list2显示信息各题的题号和得分率,在文本框text1输出所有同学的信息平均分(平均分=各题得分率*各题分值的和)。算法的VB程序如下,回答下列问题。
(1)、根据题目描述,使用如图所示数据,a(95)的数值是。(2)、在程序划线处填上合适代码,使程序完整Dim a(1 To 1000) As Integer, n As Integer
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Dim fz(1 To 16) As Integer 'fz数组存储信息各题满分值
Dim b(1 To 33) As Double '数组b存储全卷各题的得分率
For i = 1 To 16 ‘数组fz存储信息16个小题的满分值
If i <= 12 Then fz(i) = 2
fz(13) = 4: fz(14) = 8: fz(15) = 7: fz(16) = 7
Next i
For i = 2 To n '把数组a数据分别统计到各题中
b(j) = a(i ) + b(j)
Next i
For i = 1 To 33 '仅处理信息各题的平均分
If i <= 12 Then
b(i) = b(i) / (a(1) * fz(i))’计算信息选择题各题的得分率
ElseIf i >= 26 And i <= 29 Then
b(i) =
End If
Next i
For i = 1 To 16
If i > 12 Then j = i + 13 Else j = i
b(j) = Int(b(j) * 1000 + 0.5) / 10 '对结果四舍五入保留1位小数
List2.AddItem Str(i) + Str(b(j)) + "%"
ave=
Next i
Text1.Text = Str(ave / 100)
End Sub
Private Sub Form_Load()
‘读入数据到数组a,数据个数n,代码略
End Sub
-
7、下列VB程序实现数字字母混合序列分离后分别排序,最后又合并输出。具体算法如下:在文本框Text1输入若干组混合序列,每组序列中仅包含一组字母和一个多位数字,序列之间用逗号隔开,以逗号结束。单击“排序”按钮command1,把每组序列中的字母和数字分开,并分别排序,最后在列表框list1输出。排序规则如下:所有数字按从小到大升序排序,字母序列按长度升序排序,若长度相同,直接按字母序列大小升序排序(按字母的ASCII码排序,“A”<“Z”<“a”<“z”)。实现算法的部分程序界面如图所示,VB程序代码如下,回答下列问题:
Private Sub Command1_Click()
Dim a(1 To 6) As Integer, b(1 To 6) As String, i as integer, j as integer
Dim c As String, k As Integer, tmp1 As Integer, tmp2 As String
s=text1.text
i = 1: k = 1: tmp1 = 0: tmp2 = ""
Do While i <= Len(s)
c = Mid(s, i, 1)
If c = "," Then
a(k) = tmp1: b(k) = tmp2
tmp1 = 0: tmp2 = ""
①
Else
If
Then tmp2 = tmp2 + c
Else
tmp1=tmp1*10+val(c)
End If
End If
i = i + 1
Loop
For i = 1 To 5
For j = 1 To 6 - i
If a(j) > a(j + 1) Then tmp1 = a(j): a(j) = a(j + 1): a(j + 1) = tmp1
If Len(b(j)) > Len(b(j + 1)) Or ② Then
tmp2 = b(j): b(j) = b(j + 1): b(j + 1) = tmp2
End If
Next j
Next i
For i = 1 To 6
List1.AddItem Str(a(i)) + b(i)
Next i
End Sub
(1)、代码“list1.AddItem”中的AddItem是(单选,填字母:A .属性名 B .对象名 C .方法 D .事件名)(2)、在程序划线处填入合适代码,使程序完整① ②
(3)、加框处代码有错,请改正(4)、若输入的字符串为“21ckk,gho63,TCP43,23Yes,no62,phy46,”,则程序运行后第3组字符是。 -
8、小王使用flash软件制作一个关于“游戏”的多媒体作品,如图a所示。请回答下列问题:
图a
(1)、在制作作品前,首先需要对作品进行需求分析,以下属于需求分析阶段工作的是。(多选,填字母: A .考虑作品受众以小孩子为主,画面设计比较鲜艳 B .把作品划分为片头、主交互模块、片尾三个部分 C .制作作品需要使用flash、Photoshop两个软件 D .考虑作品的社会效益 E .为作品设计制作脚本大纲)(2)、“足球”图层中的足球实现了从舞台右边滚到舞台左边的动画效果,该补间动画类型是。(形状补间/动画补间中选择一项)(3)、测试场景,“松鼠”图层中的松鼠在播放过程中突然消失了,若要让松鼠一直延续到本场景结束,可行的操作是。(4)、“小兔”图层实现了兔子朝舞台左下方移动的动画,兔子开始时的坐标如图b所示,则兔子在第60帧时的坐标可能是。(单选,填字母:A .(700,92)/ B .(100,220)/ C .(300,100)/ D .(900,400) )
图b
(5)、测试影片时,“重播”按钮在最后1帧出现,单击按钮,停止声音播放,并返回到“场景1”第1帧继续播放,则按钮上添加的脚本为。 -
9、小乙收集了2019年国内部分汽车厂商的销售数据,并用Excel软件进行处理,如图a所示。请回答下列问题:
图a
(1)、如图a中,区域E2:E16中的数据是先从E2单元格利用公式计算再向下自动填充得到的,则E3单元格中的公式是(市场份额=1-9月累计销量/全国销量*100)(2)、利用图a中部分数据制作了图表,如图b所示。则该图表的数据区域是。
图b
(3)、若把图a中的D16单元格的数据修改为1500000,则图b的图表会否发生变化?(选填:会/不会)(4)、将图a中A1:E15区域的数据复制到新工作表,筛选条件如图c所示,则按此条件筛选出的厂商数有个
图c
-
10、有如下VB程序
a(1) = 1
For i = 2 To 12
a(i) = a(i - 1) + Int(Rnd * 2) + 1
Next i
Key = Val(Text1.Text)
i = 1: j = 12: cnt = 1: flag = False
Do While i <= j And flag = False
cnt = cnt + 1
m = (i + j + 1) \ 2
If a(m) = Key Then
flag = True
ElseIf Key > a(m) Then
i = m + 1
Else
j = m - 1
End If
Loop
程序运行后,下列说法正确的是( )
A、在text1输入15,程序运行后m肯定为12 B、在text1输入6,程序运行后cnt可能大于4 C、若查找不成功,则j>m肯定成立 D、若查找不成功,则i<=m肯定成立 -
11、生成10个不重复的随机整数,保存在数组a中,并升序排列,实现算法的VB程序如下。
Dim a(1 To 10) As Integer, f(1 To 20) As Boolean
'f数组各元素的初值设为False,代码略
For i = 1 To 10
t =int(rnd()*20+1)
If Not f(t) Then
a(i) = t: ⑴
For j = i To 2 Step -1
If ⑵ Then
tmp = a(j): a(j) = a(j - 1): a(j - 1) = tmp
End If
Next j
Else
⑶
End If
Next i
上述程序中3处下划线应填入的程序代码是( )
A、⑴f(t) = True ⑵a(j) < a(j - 1) ⑶i=i-1 B、⑴f(t) = True ⑵a(j) > a(j - 1) ⑶i=i-1 C、⑴f(t) = True ⑵a(j) < a(j - 1) ⑶t =int(Rnd()*20+1) D、⑴f(t) = False ⑵a(j) > a(j - 1) ⑶t =int(Rnd()*20+1) -
12、有如下VB程序段:
Dim a(1 To 5) As Integer
a(1) = 1
For i = 2 To 5
a(i) = Int(Rnd() * 3) + 3
Next i
For i = 2 To 5
If a(i) Mod 2 = 1 Then
a(i) = a(i) + a(i - 1)
Else
a(i) = a(i) / 2
End If
Next i
执行程序后,a数组各元素可能是( )
A、1,2,6,10,13 B、1,5,8,15,22 C、1,4,9,2,7 D、1,2,5,11,1 -
13、有如下VB程序段:
s = Text1.Text: sum = 0: t = 0: cnt = 1
For i = 1 To Len(s)
c = Mid(s, i, 1)
If c >= "0" And c <= "9" Then
j=j+1
Else
If cnt Mod 2 = 1 Then sum = sum + val(mid(s,i-j,j))
j= 0:cnt = cnt + 1
End If
Next i
在文本框text1输入“12d6a3c4f20”,程序运行后sum的值是( )
A、21 B、15 C、45 D、25 -
14、生成2位能被3整除的随机整数的VB表达式是( )A、int(Rnd()*90+10 ) B、int(Rnd*30)*3+12 C、int(Rnd*88+12) D、int((Rnd*30)*3)+12
-
15、某算法的部分流程图如图所示。执行该流程,输出s和i的值分别是( )
A、10 10 B、0 11 C、0 10 D、10 11 -
16、使用GoldWave软件编辑某音频文件,选中其中一段音频进行编辑的部分界面如第6题图所示,下列说法正确的是( )
A、此文件是一个单声道、无损压缩的音频 B、当前状态下,执行“删除”命令后再插入20s静音,音频文件存储容量不变 C、当前状态下,执行“剪裁”命令后直接保存,音频长度变为20s D、此文件存储容量大小约为10MB -
17、有一段未压缩的无声视频,已知该视频的帧频是25fps,颜色位数为16位,分辨率是800*600,视频存储容量约1.35GB,则视频的时长约是( )A、10s B、30s C、60s D、120s
-
18、用UltraEdit软件观察字符内码,部分界面如图所示,下列说法正确的是( )
A、上述字符中共有8个ASCII码字符 B、字符“1+2”的内码可能是“31 2E 32” C、字符“P”的内码用十六进制表示是“51” D、汉字“联”的内码用十六进制表示是“EF C1” -
19、使用ACCESS软件打开某数据库,部分界面如图所示,下列说法正确的是( )
A、ACCESS是一种小型的数据库应用系统 B、“身份证号”字段的类型可能是数字 C、添加一条新记录,其“出生日期”字段可能显示为“2001年4月5日” D、报名费字段类型为“货币”,当前记录的报名费输入“¥60”将提示错误 -
20、使用OCR软件进行字符识别,下列说法正确的是( )A、可以识别jpg、psd等图像中的文字 B、版面分析的过程使用了人工智能技术 C、完成OCR识别必不可少的步骤有:扫描—旋转图像—识别 D、对图像进行倾斜校正有助于提高识别准确率