浙江省名校协作体2018届高三下学期信息技术3月选考试题

关于信息与信息技术，以下说法正确的是（   ）

使用Word软件编辑一篇文章，界面如图所示

以下说法正确的是（   ）

关于人工智能，以下说法不正确的是（   ）

关于Access数据库，以下说法正确的是（   ）

某算法的流程图如图所示。执行这部分流程后，输出变量i的值是（   ）

使用UltraEdit软件观察字符“AI时代来了！”的内码，部分界面如图所示。

以下说法正确的是（   ）

关于多媒体技术，以下说法中正确的是（   ）

用Photoshop软件制作“中国诗缘”作品，界面如图所示：

以下说法正确的是（   ）

使用Flash软件制作动画作品，“main”场景中“控制”图层最后一帧上有代码“stop();”，“背景”图层内有一张导入的bg.jpg图像，“音乐”图层的音乐文件时长为10秒钟。“main”场景时间轴图1所示，“人物”元件界面如图2所示：

 

图1

 

图2

以下说法正确的是（   ）

【加试题】琳琳用GoldWave软件编辑一段音乐，如图1所示。在当前界面中，她单击“剪裁”按钮，然后执行“文件”——“另存为”命令，对话框如图2所示

图1

 

图2

另存后文件的存储容量约为（   ）

【加试题】如图所示，a 、b 、c 三个数比较大小，单击“求最大值”按钮，在文本框Text4中输出三者之间最大的数，选出不能实现该功能的程序段（   ）

【加试题】有如下VB程序段：

Dim a(5) As Integer

Dim i As Integer, j As Integer, t As Integer

a(1) = 52: a(2) = 15: a(3) = 37: a(4) = 22: a(5) = 35

i = 1

Do While i < 5

    t = i: j = i + 1

    Do While j <= 5

        If a(j) > a(t) Then t = j

        j = j + 1

    Loop

    x = a(t): a(t) = a(i): a(i) = x

    i = i + 1

Loop

Text1.Text = Str(a(2))

运行该段代码后，文本框Text1中显示的内容为（   ）

王老师从国家统计局网站收集了2017年9、10、11三个月中国主要工业产品（部分）产量的数据，并用Excel软件进行处理，如图1所示。

 

图1

请回答下列问题：

“字符洗牌”程序模拟扑克洗牌的操作，为了打乱牌序，把手上的扑克牌中间抽一部分放到最上面，完成一次洗牌（如字符串“1234ABCD”，若把中间的第3个到第5字母抽出并保持原来的顺序放到最前面，则一次洗牌操作后字符串变成“34A12BCD”），也可以把扑克牌分成上下两部分，把下面的部分放置到上面（如字符串“1234ABCD”，把第3个字符到最后一个字符移到前面，变成“34ABCD12”），多次重复做这个动作，就能达到洗牌的目的，效果如图所示。

 

欣欣要制作一个关于梁祝故事的多媒体作品，她先用PhotoShop软件处理图像，然后用Flash软件制作动画。请回答以下各题：

图1

【加试题】德国数学家哥德巴赫曾猜测：任何大于6的偶数都可以分解成两个素数（素数对）的和。但有些偶数可以分解成多种素数对的和，如： 10=3+7，10=5+5，即10可以分解成两种不同的素数对。

小敏编写了一个VB程序，用来求一个偶数(6到100之间)可能存在多少这样的素数对（注： A+B与B+A认为是相同素数对，不重复统计），并把这些结果输出到一个列表框中，通过逻辑推理，小敏发现这些素数对都是奇数，所以她只需要验证奇数的素数对即可。运行界面如图所示，程序代码如下。但加框处代码有错，请改正。

 

Dim IsPrime(100) As Boolean  '用来存储是否素数，True为素数，False为非素数

Private Sub Command1_Click()

    Dim x As Integer, y As Integer, i As Integer, num As Integer

Call Init  '调用Init函数

    x = Val(Text1.Text)

y = x \ 2

num = 0

For i = 3 To y Step 2

                 '①

num = num + 1

            List1.AddItem Str(x) + "=" + Str(i) + "+" + Str(x - i)

        End If

    Next i

    Label2.Caption = "偶数" + Str(x) + "共有" + Str(num) + "个素数对。"

End Sub

Sub Init() '初始化IsPrime数组的值

    Dim i As Integer, j As Integer, x As Integer

    For i = 3 To 100 Step 2

        x = Int(Sqr(i))

                            '②

            If i Mod j = 0 Then Exit For

        Next j

        If j > x Then IsPrime(i) = True Else IsPrime(i) = False

    Next i

End Sub

① ② 

【加试题】对于数组（形如a数组：4、5、6、1、2、3或b数组：1、2、3、4、5、6），我们称元素1为此二数组的拐点。为寻找此类递增或循环递增数组的拐点，可以用顺序查找和对分查找的方法，通常相比之下对分查找算法较优，以下为使用对分法查找拐点的算法。

做法是比较中点与当前查找范围第1个数大小关系，用对分法使查找范围逼近拐点；当余下数组只有二个元素时，可根据此二元素大小关系得到拐点的位置。

依据上述描述设计了VB程序，界面如图所示。请回答下列问题：