相关试卷
-
1、某算法的流程图如图所示。执行这部分流程图后，变量s与n的值分别为（ ）
A、36 8 B、35 8 C、36 9 D、35 9 -
2、使用Photoshop软件，编辑“旅行.psd”文件的界面如图所示。下列说法正确的是（ ）
A、“旅行”图层使用了滤镜效果 B、“背景”图层可以直接进行重命名 C、可以使用“油漆桶”工具修改“感悟”图层中文字的颜色 D、可以使用“自由变换”功能改变“旅行”图层中文字大小 -
3、将一幅分辨率为1024*768像素的BMP图像，以4：1的压缩比存储为JPEG格式后，其存储容量为192KB，则该图像的位深度为（ ）A、32位 B、24位 C、16位 D、8位
-
4、使用 GoldWave 软件编辑某音频文件的操作界面如图所示。下列说法正确的是（ ）
A、若执行“删除”命令，右声道的第20秒至30秒会产生10秒的静音 B、若先执行“删除”命令，然后再插入10秒静音，音频文件的时长保持不变 C、若执行“淡出”命令后直接保存，音频文件存储容量与原来一样 D、若执行“更改音量”命令，将音量升高两倍后直接保存，音频文件存储容量是原来 的两倍 -
5、使用UltraEdit软件观察字符串“抗击 2019-nCoV”的界面如图所示。下列说法正确的是（ ）
A、字符“V”对应的二进制内码为01011010 B、汉字“击”的内码是B9 BB C、一共有9个ASCII字符 D、存储这些字符一共需要12bit -
6、小刘用 Access 软件设计了“班级藏书”数据表，其数据表视图的部分界面如图所示。下列说法正确的是（ ）
A、可以将“书名”字段设为主键 B、当前数据表的名称是“班级藏书.accdb” C、书籍编号可以输入“ISB201901” D、不能在当前选中记录前添加新记录 -
7、下列应用中，体现人工智能技术的是（ ）
① 通过语音方式输入文字
② 快递小哥对快递包裹二维码进行扫描，并完成包裹运输状态的登记
③ 小区业主通过刷脸方式进入小区
④ 在WORD软件输入某一个单位的缩写时，立即更改为该单位的全称
⑤ 利用某软件识别照片中花卉的种类
A、①③⑤ B、①②③ C、②③④ D、③④⑤ -
8、下列关于信息处理说法，不正确的是（ ）A、计算机内所有信息都采用二进制表示 B、计算机出现后人类才开始进行信息处理 C、只有将外部信息输入计算机后才能被计算机处理 D、算术运算与逻辑运算是计算机处理信息的基本运算
-
9、大写字母分段加密。输入n(n≤50)个大写字母组成的原文字符串，以规模m为一段进行加密。加密方法为：(1)找出每段中最长的连续递增子串长度max；(2)将该段每个字符后移max位进行加密，如果后移后的字母ASCII码值超过90(Asc("Z")=90)，则从小写字母“a”(ASCII码值为97)开始表示；(3)规模不足m部分不做处理。
例如：n=10，原文字符串为“ABCXYEFDOK”，m=4时，处理过程如下：
其中，第1段中字母“X”后移4位后超过字母“Z”的ASCII码值，用“b”表示，第2段中字母“Y”后移2位用“a”表示用VB编写程序，程序运行时，在文本框Text1中输入原文字符串，在文本框Text2中输入每段个数，单击“加密”按钮Command1后，在文本框Text3中显示加密结果。程序运行界面如图所示。
实现上述功能的VB程序如下，请回答下列问题：
(1)、已知加密结果是“RaVJON”，m=4，根据上述加密规则，推得原文是(2)、请在划线处填入合适的代码。Dim a(0 To 50) As String, b(1 To 50) As Integer
Private Sub Command1_Click ()
Dim i As Integer, j As Integer, k As Integer, m As Integer, max As Integer
n = Len(Text1. Text)
For i=1 To n
a(i) = Mid(Text1.Text, i, 1)
b(i) =
Next i
m=Val (Text2. Text)
max=1
For k=1 To n\m
For i=(k-1)*m+2 To k*m
j=i
Do while
b(i)=b(i)+1
j=j-1
Loop
If b(i)>max Then
max = b(i)
End If
Next i
For i=(k-1)*m+1 To k*m
s =s+ mingtoni (a(i)， max)
Next i
max=1
Next k
If n Mod m <> 0 Then
For i=(n\m)*m+1 To n
s=s+ a(i)
Next i
End If
Text3.Text = s
End Sub
Function mingtomi(e As String, d As Integer) As String
If Ase(c) + d > Asc("Z") Then
Else
mingtomi = Chr(Asc(c) + d)
End If
End Function
-
10、数轴上有n个闭区间，现要删除尽可能少的区间，使剩下的区间都不相交。若区间与另一区间之间仅有端点是相同的，不算做区间相交，例如，[1，2]和[2，3]是不相交区间。解决该问题的舞法思想：(1)首先对所有区间进行排序：右端点为主要关键字，左端点为次要关键字都升序排序；(2)然后在排序后的结果中依次统计不相交的区间个数，最后根据不相交的区间个数计算需删掉的区间个数。
编写VB程序，实现上述功能：程序运行时，随机产生n个闭区间(保证左端点值<右端点值)，并排序后显示在列表框List1中。单击“计算”按钮后，在列表框List2中显示最终区间情况，在文本框Text1中显示删除区间的个数。程序运行界面如图所示。
请回答下列问题：
(1)、界面中“计算”按钮的对象名为。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n= 5
Din a(1 To 2 * n) As Integer
Dim d(1 To 2 * n) As Integer
Private Sub Form Load0
'随机产生n个闭区间，a(1)、a(2)为第1个区间的左端点和右端点，a(3)、a(4)为第2个区间的左端点和右端点，…a(2*n-1)、a(2*n)为第n个区间的左端点和右端点。
For i=1 To n-1
For j=i+1 To n
If a(2*i)>a(2*j) Or Then
t=a(2*i): a(2*i)=a(2*j): a(2*j)=t
t=a(2*i-1):a(2*i-1)=a(2*j-1):a(2*j-1)=t
End If
Next j
Next i
'排序后的区间情况显示在列表框List1中，代码略。
End Sub
Private Sub Cmd1_Click( )
Dim k As Integer, i As Integer, e As Integer
c=1
List2. Additem “[” + Str(a(1)) + "," + Str(a(2)) + “]”
k=
For i=2 To n
If
Thenc=c+1
k=a(2*i)
List2. MddItem "[" + Str(a(2*i- 1)) +".”+ Str(a(2*i)) + "]"
End If
Next i
Text1.Text=“删除”“剩除”++"个区间”
End Sub
(3)、程序中加框处代码有错，请改正。 -
11、某同学制作“亲子活动”的多媒体作品，首先在Photoshop中进行图片处理，然后再用Flash软件创作了一个动画，请回答下列问题：
(1)、如图a所示，下列对“背景”图层的操作中可行的是(多选，填字母：A .将“蜗牛父子”图层的图层样式拷贝粘贴至“背景”图层/B .将“背景”图层移至“石台”图层上方/C .给“背景”图层添加“镜头光晕”的滤镜效果/D .用仿制图章工具将“背景”图层上的“昵图网”字样去除/E.删除背景图层，存储为JPG格式，该图像部分透明)
(2)、当前状态下执行测试影片命令，首先播放的场景是(3)、当前状态下是否能移动“蜗牛老爸”图层第31帧舞台上的对象(填字母：A .是/B .否)(4)、测试场景时发现，“芦苇”图层的动画播放完毕，芦苇仍旧左右摇摆，则“芦苇”图层实例的元件类型是(5)、当前场景播放完毕，需单击“退出”按钮才进入“谢幕”场景第1帧播放，则“按钮”图层第60帧中应设置的动作命令为(6)、要使“背景”图层的内容持续到本场景结束，并且当前场景播放完毕时声音同时停止，解决问题的正确方法是 -
12、某同学收集了某超市2019年第三季度部分商品销售情况的统计数据，并使用Excel软件进行数据处理，如图a所示。
请回答下列问题：
(1)、如图a所示，若要正确计算蔬菜类7月销量总计，则下列方法错误的是 (单选，填字母)A、在C13单元格中输入公式“=SUM(C9，C10，C11，C12)” B、在C13单元格中输入公式“=SUM(C9：C12)” C、在C13单元格中输入公式“=C9+C10+C11+C12” D、将C8单元格直接复制粘贴到C13单元格(2)、用排序的方法找出蔬菜类“9月增幅(%)”最大的商品，则排序应选择的数据区域为 ， 主要关键字为。(3)、根据图a中数据制作的图表如图b所示，创建该图表的数据区域是。
-
13、某同学将对分查找程序进行了改编，程序运行时，自动产生9个[10，99]之间的不重复随机数并降序排列，在文本框Text1中显示。在文本框Text2中输入查找键key，单击“查找”按钮Command1，将查找结果显示在文本框Text3中。程序运行界面如图所示。
Key = Val (Text2. Text)
i =1
j=9
flag = False
Do While i <= j And flag = False
m=(i+j)\2
If ⑴ Then
j=m-1
ElseIf ⑵ Then
i=m+1
Else
If ⑶ Then
j=m-1
ElseIf ⑷ Then
i=m+1
Else
flag = True
End If
End If
Loop
If flag Then Text3. Text = “在第”+ Str(m) +“个”Else Text3. Text =“找不到”
上述程序段中横线处可选语句为：
①Key \ 10 > a(m) \ 10 ②Key Mod 10 < a(m) Mod 10
③Key \ 10 < a(m) \ 10 ④Key Mod 10 > a(m) Mod 10
则(1)(2)(3)(4)处语句依次为（ ）
A、①②③④ B、④②①③ C、①③④② D、①②④③ -
14、某冒泡排序算法的VB程序段如下：
i =n
Do while i>=2
For j=
If a(j) > a(j- 1) Then
t = a(j): a(j) = a(j-1): a(j-1) =t
End If
Next j
i=i-1
Loop
执行完上述程序段后，实现a数组元素有序排列，则划线处的代码可以是（ ）
①n To n + 2- i Step –i ②n To i + 1 Step -1 ③2 To i ④2 To n-i
A、②③ B、②④ C、①④ D、①③ -
15、有如下VB程序段：
s = "cbafedgh"
m= 3: c=" ": n= Len(s)
For i=1 To n
j=(i-1) Mod 3 + 1
If m> n Then Exit For ‘退出For循环
c= c + Mid(s, m-j+1, 1)
If j Mod 3=0 Then m=m+3
Next i
If i < n Then c = Mid(s, i, n-i+1)+ c
执行该程序段后，变量c的值是（ ）
A、abcdef B、abcdefgh C、ghabcdef D、hgabcdef -
16、有如下VB程序段：
m = a(1): s=0
For i=2 To 5
If a(i) >m Then s=s+m
m= a(i)
Next i
数组元素a(1)到a(5)的值依次为“1，3，4，2，3”，执行该程序段后，变量s的值为（ ）
A、6 B、7 C、10 D、13 -
17、如图是求 的流程图，则图中①处应填入的内容是（ ）
A、A←1+ B、A←2+ C、A← D、A← -
18、在VB中，若x、y都是正整数且表达式x Mod y=1为真，则下列关系表达式值一定为真的是（ ）A、x>y B、x\y=0 C、x\y<>x/y D、x*y Mod 2=0
-
19、使用Photoshop软件编辑“算术.psd”，部分界面如图所示。
则当前文档的图像大小为（ ）
A、300*400像素 B、520*1000像素 C、450*800像素 D、1116*1400像素 -
20、使用Goldwave软件打开某音频文件，选中其中一段音频后的部分界面如图所示。
下列说法正确的是（ ）
A、当前状态下执行“删除”操作，则两个声道的2～4秒均为静音 B、当前状态下执行“裁剪”操作，保持其他参数不变直接保存，存储容量约为344.5KB C、把音频文件“素材.wav”重命名为“素材.mp3”，可以实现声音格式的转换 D、当前状态下执行“插入6秒静音”操作，音频的时长不变