下列有关信息的说法，正确的是（   ）

A．用搜索引擎搜索到的信息都是可信的

B．信息的载体可以是文字，也可以是图像、声音等

C．青少年应拒绝浏览因特网上信息，以维护身心健康

D．电子邮件是一种常用的信息交流工具，邮件发送者不必拥有电子邮箱

一幅未经压缩的1366×768像素、24位真彩色的BMP图像，其存储容量约为

A．3MB

B．24MB

C．768MB

D．3073MB

下列十六进制数中，与二进制数1010100101B值相等的是

A．2A5H	B．A25H
C．A91H	D．A94H

某算法的部分流程图如图所示。执行这部分流程后，“x←x－2”被执行的次数为

A．0次	B．1次
C．2次	D．3次

有如下VB程序段:
Dim a(1 to 5) as Integer, i as Integer, c as Integer
a(1) = 2 : a(2) = 1 : a(3) = 3 : a(4) = 4 : a(5) = 5
c = 0
For I = 3 to 5
If a(i - 2) + a(i - 1) = a(i) Then c = c + 1
Next i
Text1.Text = Str(c)
该程序运行后,文本框text1中显示的内容是（　　）

A．1

B．2

C．3

D．4

小李想用 Photoshop 软件对左图所示的图像进行加工处理，得到如下图所示的效果。则下列操作可行的是

A．水平翻转，并进行羽化处理

B．缩放图像，并进行描边处理

C．顺时针旋转 90 度，并设置图层样式为“投影”

D．垂直翻转，并添加“镜头光晕”滤镜效果

使用Photoshop软件制作“水上芭蕾”作品，部分界面如图所示。

下列说法正确的是

A．“文字”图层被设置了图层样式，因而不能再编辑其中的文字

B．将“演员”图层设置不可视，则“倒影”图层也会变为不可视

C．“倒影”图层中的图像可以通过将“演员”图层中的图像进行垂直翻转等操作后得到

D．将作品存储为JPEG格式文件，该JPEG格式文件保留原作品的图层信息

小张收集了某城市20种主要食品平均价格的数据，并用Excel软件进行数据处理，如第13 题-1图所示。请回答下列问题：

1图
（1）在1图所示工作表中，区域G4：G23中的数据是通过公式计算得到的：选择该区域中的一个单元格，输入公式，然后用自动填充功能完成其他单元格的计算。 G4单元格的公式是_____________。
(提示：涨跌幅（％) =(本期价格(元)-上期价格(元))/上期价格(元)×100)[来源:学.科.网]
（2）为了更加直观地比较蔬菜类价格波动情况，小张制作了如下图所示的图表。 该图表的数据区域是________________。

（3）若将F23单元格中的数据改为7.06，则图表中“豆角”的“本期价格（元）”对应的数据条将______________(选填:升高/不变/降低）。
（4）为了筛选出上期价格和本期价格相同的所有食品，应对__________列设置筛选条件。

小吴创作“狐狸和乌鸦”故事的多媒体作品。她首先使用Photoshop软件制作一张背景图片。请回答下列问题

（1）如1图所示，Photoshop画布中的“背景”、“树”和“标题”3个元素分别放在不同的图层中，这种将组成作品的各元素分图层处理的手段有许多优点，其中包括:
(多选，填字母：A.方便设置各元素的大小和颜色/B.节约作品的存储空间/C.提高图像的分辨率/D.灵活调整各元素之间的位置关系/

A．独立设置各元素的滤镜效果）。

（2）按1图所示的图层设置，将作品存储为BMP格式的图像，该BMP图像中的文字_   (选填:有/没有）投影效果。
（3）若只使“树”图层中的“树”消失，造成这种现象的操作可能是
（4）小李创作题为“闻鸡起舞”的多媒体作品。他使用Photoshop软件制作图片。请回答下列问题:

如图a所示，“背景”图层图像颜色为白色，“篱笆”图层的图像背景也为白色。若只使“篱笆”图层中的“闻鸡起舞”消失，下列操作方法中正确的有  （多选，填字母:A.用“橡皮擦”擦除“闻鸡起舞”/B.用“魔棒”选择白色区域，反选后删除/C.用矩形选框”选中“|闻鸡起舞”区域后删除/D.设置“拾色器”的前景色为白色，用“画笔”对“闻鸣起舞”进行涂画）。

编写VB程序，实现如下功能:在文本框Textl和Text2中分别输入一个整数，单击命令按钮Command1,在列表框List1中显示结果，运行效果如1图所示。结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。
 
1图 2图
（1）要使命令按钮Command1上显示的文本改为“转换”，可在其属性窗口（2图) 中将属性的属性值修改为“___________”。
（2）为实现上述功能，请在划线处填入合适代码或选项。
Private Sub Command1_Click()
Dim t1 As Integer, t2 As Integer
Dim i As Integer, t As Integer
Dim f As Single
List1.Clear
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If     ①     Then  '(选填字母,从下列A.B.C.D四个选项中选取一项）
t =" t1:" t1 =" t2:" t2 = t
End If
i = t1
Do While ②     '(选填字母,从下列A.B.C.D四个选项中选取一项）
f =" i" * 9 / 5 + 32    '摄氏温度转换为华氏温度
List1.AddItem Str(i) + " " + Str(f)
③ '（填程序代码）
Loop
End Sub
划线①、②处的选项:
A.i <= t2  B.f <= t2  C.t1 > t2 

A．i < f

n个数据的冒泡排序需要经过n-1遍加工，每一遍加工自下而上比较相邻两个数据，把较小者交换到上面。小刘发现：当某一遍加工过程中没有数据交换，说明数据已经有序，无需进一步加工。为此，小刘对算法进行优化，编写了一个VB程序，功能如下：运行程序时，在列表框List1中显示排序前数据，单击“排序”按钮Commaiid1，在列表框List2 中显示这些数据按升序排序后的结果，在标签Label3中显示排序过程的加工遍数。运行效果如第16题图所示。

实现上述功能的VB代码如下，但加框处代码有错，请改正。
Dim a(1 To 8) As Integer
Dim n As Integer
Private Sub Form_Load()
'n=8，排序前数据存储在数组a中，并在列表框Listl中显示
'代码略
End Sub
Private Sub Command1_Click()
Dim flag As Boolean 'flag值为True表示一遍加工中发生过交换
i = 1
flag = True
Do While    '（1）  
flag = False
For j =" n" To i + 1 Step -1
If a(j) < a(j - 1) Then
k =" a(j):" a(j) =" a(j" - 1): a(j - 1) = k
flag = True
End If
Next j
i =" i" + 1
Loop
Label3.Caption = "排序过程的加工遍数为" +     '（2）
For i =" 1" To n
List2.AddItem Str(a(i))
Next i
End Sub