相关试卷
-
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、通过网络下载办公自动化软件WPS2019，使用的是下列哪项因特网服务？（ ）A、HTTP B、FTP C、 Telnet D、BBS
-
8、病人坐在家中，打开计算机登录因特网中某医生的网站，医生便可以对病人进行诊疗，这种应用属于（ ）。A、虚拟现实 B、网络计算 C、远程医疗 D、自动控制
-
9、在因特网上提供的服务有很多，以下不是因特网服务的是（ ）。A、在线电影 B、IP电话 C、QQ聊天 D、传真
-
10、某校跳高比赛计分规则如下：每个高度每位选手最多试跳三次，成功记为1，失败或轮空记为0。如选手第一次试跳成功记为100，第二次试跳成功记为010，第三试跳成功记为001，三次失败则终止比赛。编写VB程序统计选手积分，在文本框Text1中输入姓名和成绩，在列表框List1中输出结果，其算法如下：1.将每个选手的跳高记录三位一组转换成十进制数存储到数组a (该数组元素的值都不相同)。2.先比较数组a中各数组元素的长度，长度长的排名在前；若长度相同的情况下从后往前依次比较字符大小，当前数值大的排名在前。程序运行界面如图所示：
请在划线处填入合适的代码。
Dim a(1 To 9) As String '存储跳高成绩
Dim b(1 To 9) As String '存储学生姓名
Dim c(1 To 9) As Integer
Private Sub Command1_Click()
Dim ch As String, tmp As Integer, t As Integer
Dim p As Integer, k As Integer, i As Integer, j As Integer
Dim s As String
s = Text1.Text: t = 0
For i = 1 To .
If Mid(s, i, 1) <> "/" Then
ch = ch + Mid(s, i, 1)
Else
t = t + 1
If t Mod 2 = 0 Then
a(t \ 2) = zh(ch)
Else
End If
ch = ""
End If
Next i
For i = 1 To t\2
c(i) = i
Next i
For i = 1 To t \ 2 - 1
p = i
For j = i + 1 To t \ 2
If Len(a(c(p))) < Len(a(c(j))) Then
p = j
ElseIf Len(a(c(j))) = Len(a(c(p))) Then
k = Len(a(j)): flag = True
Do While k >= 1 And flag
If Val(Mid(a(c(j)), k, 1)) > Val(Mid(a(c(p)), k, 1)) Then
p = j
flag=false
ElseIf val(Mid(a(c(j)), k, 1)) = val(Mid(a(c(p)), k, 1)) Then
k = k - 1
Else
flag = False
End If
Loop
End If
Next j
If p <> i Then
tmp = c(i): c(i) = c(p): c(p) = tmp
End If
Next i
For i = 1 To t \ 2
Next i
End Sub
Function zh(cm As String) As String
Dim temp As String
Dim i As Integer, j As Integer
For i = 1 To
For j = 1 To 3
temp =temp * 2 + Val(Mid(cm, (i - 1) * 3 + j, 1)) .
Next j
zh = zh + CStr(temp) 'CStr函数可把表达式转换为字符串类型
temp = 0
Next i
End Function
-
11、某加密算法对大写字母加密，其加密规则如下：密文的ASCII码值=明文的ASCII码值+密钥，加密后生成的密文仍为大写字母。其密钥是在3*3矩阵中获得，获得密钥的方式为：如字母“A”的ASCII码值为65，将65反复除3，其转换过程如图1所示，得到商为2，密钥在矩阵中所在行；得到余数2，密钥在矩阵中所在列；商或余数为0，密钥在矩阵中最后一行或最后一列。其程序运行界面如图2所示。
(1)、下列对象中没有Caption属性的是(单选，填字母:A .Command1 /B .Form1 /C .Text1和Text2)。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Dim a(1 To 9) As Integer
Private Sub Command1_Click()
Dim column As Integer, row As Integer, t As Integer, tmp As Integer
Dim s As String, ch As String, result As String
s = Text1.Text: result = ""
For i = 1 To Len(s)
ch = Mid(s, i, 1): t =.
column = (t - 1) Mod 3 + 1
Do While t >= 3
t = t \ 3
Loop
row =
tmp = (Asc(ch) + - 65) Mod 26 + 65
result = result + Chr(tmp)
Next i
Text2.Text = result
End Sub
Private Sub Form_Load() '用来生成3*3矩阵
For i = 1 To 9
a(i) = Int(Rnd * 9) + 1
s = s + Str(a(i))
If i Mod 3 = 0 Then
List1.AddItem s
s = ""
End If
Next i
End Sub
(3)、程序中加框处代码有错，请改正。(4)、根据程序的功能并结合图2，字母C加密后的密文为。 -
12、用Flash软件打开“风荷举.fla”文件，编辑界面如图所示。
(1)、在创作作品前，要进行相应的分析。下列不属于应用需求分析的是。（多选，填字母：A .根据脚本大纲，编写文字脚本 /B .确定作品的主题思想为“风荷举” /C .该作品面向小学生演示播放 /D .设计作品的主交互界面 /E .确定该作品的经济效益）(2)、要使当前场景动画播放结束，“音乐”图层中的声音同时停止，可将“音乐”图层中声音的“同步”属性设置为（选填：数据流/事件）。(3)、在“鹅”图层中创建了“鹅”实例从舞台左侧游到舞台右侧的动画，则该动画的类型是（选填：动画补间/形状补间）。(4)、为使“荷花”图层中的 “荷花”实例在动画开始2秒后出现，可行的操作是。(5)、影片发布后，单击“链接”按钮， 实现在浏览器中打开网站“http://www.wjszx.com.cn”，同时关闭动画。则“链接”按钮的动作脚本为on(press){}。 -
13、小林收集了某地第二季度的天气数据，并用Excel软件进行数据处理，如图所示。
图1
请回答下列问题：
(1)、在G3单元格输入公式并用自动填充功能完成区域G4:G84的计算，计算时应用了IF函数，则G78单元格中的公式是。（提示：If函数用于判断是否满足某个条件，如果满足返回一个值，如果不满足返回另一个值。例如：“=IF(E2<60,"不合格",IF(E2>=80,"优秀","合格"))”）。
(2)、根据图1中的数据制作如图2所示的图表，则创建该图表的数据区域是。
图2
(3)、将数据区域A2：G84复制到新的数据表，若要从表中找出“温差”最大的记录。下列方法可行的是 。（多选，填字母）。A、以“温差”为“最大1项”进行筛选，可筛选出符合要求的数据 B、用Max函数计算出D列中最大的一项即为所需数据 C、以“温差”为主要关键字进行降序排序，选取与第1条温差值相同的数据 D、以“最低温度”为“最小1项”、“最高温度”为“最大1项”进行筛选，可筛选出符合要求的日期 -
14、某VB程序段如下：
For i = 1 To 7
b(i) = 1
Next i
For i = 1 To 7
For j = 1 To i - 1
If a(i)>a(j) and b(i)<=b(j) Then
b(i) = b(j) + 1
End If
Next j
If b(i) > max Then max = b(i)
Next i
数组元素a(1)到a(7)的值依次“50,10,14,64,47,70,82”，执行该程序段后，变量max的值是（ ）
A、5 B、4 C、3 D、2 -
15、某对分查找算法的VB程序段如下：
i = 1: j = 6: k = 0
key = Val(Text1.Text)
Do While i<= j
k = k + 1
m = Int((i + j)/2 + 0.5)
If key = a(m) Then Exit Do
If key < a(m) Then j = m - 1 Else i = m + 1
Loop
文本框Text1中输入27，执行该程序段后，k的值为2，则a(1)到a(6)各元素可能的值是（ ）
A、12，45，27，31，78，95 B、15，27，56，61，73，89 C、89，73，61，56，35，27 D、13，31，47，56，73，80 -
16、生成n个不重复2位随机奇数的VB程序段如下：
For i = 1 To n
a(i) =
For j = 1 To i-1
If a(i)=a(j) Then
Exit For
End If
Next j
Next i
上述程序段2个方框处的表达式分别为
A、① Int(Rnd*50)*2+11 ② j = j - 1 B、① Int(Rnd*99)+1 ② i = i - 1 C、① Int(Rnd*89)+11 ② j = j + 1 D、① Int(Rnd*45)*2+11 ② i = i - 1 -
17、对N个数进行冒泡排序，下列描述正确的是（ ）A、比较次数为N-1次 B、最多需交换N次 C、交换数据的次数一定比选择排序多 D、元素的交换次数小于或等于元素的比较次数
-
18、下列VB表达式的值为奇数的是（ ）A、Int(17/4) B、Asc("A")+1 C、Abs (-1) +2 D、Val(Mid("123456", 4, 1))
-
19、某算法的部分流程图如右图所示。执行这部分流程，变量a的值是
A、4 B、5 C、1 D、0 -
20、如图所示是一幅未经压缩的1024*768像素、256色的BMP图像。
下列说法正确的是（ ）
A、该图像的存储容量约为6MB B、BMP是静态图像的压缩标准 C、该图像每个像素色彩编码的位数为8 D、该图像中存在时间冗余