浙江省衢州、湖州、丽水2021届高三上学期信息技术11月教学质量检测试卷

试卷更新日期:2020-11-20 类型:月考试卷

一、选择题(本大题共12小题,每小题2分,共24分。每小题列出的四个备选项中只有 一个是符合题目要求的,不选、多选、错选均不得分)

  • 1. 下列关于信息与信息处理的说法,错误的是(   )
    A、使用计算机处理信息,其本质都是通过计算来完成的 B、信息的加工必须使用智能手机、计算机等终端才能完成 C、拍图识字、汽车自动驾驶等信息处理应用了人工智能技术 D、计算机进行信息处理时不仅与硬件密切相关,还需软件支持
  • 2. 下列有关网页与浏览器的说法,正确的是(   )
    A、使用搜索引擎检索的结果中,排在第一条的内容必定准确度最高 B、使用浏览器收发电子邮件的过程中涉及的协议只有POP3和SMTP C、使用HTML协议在浏览器与Web服务器之间传输的信息内容是用HTTP描述 D、在IE浏览器中以“文本文件(*.txt)”类型保存网页,无法保存网页中的超链接地址
  • 3. 用 Access 软件设计“图书”数据表,在数据表中已录入如图a所示的原始数据,其设计视图如图b所示。

    图 a


    图 b

    下列描述正确的是(   )

    A、Access软件属于数据库应用系统 B、可以增加数据类型为自动编号的“序号”字段 C、设计视图中字段顺序必须要和原始数据的列顺序保持一致 D、向数据表中添加新的记录时,“图书编号”字段的有效输入值可以为“20182002”
  • 4. 将下列数转换为十进制数,除以4后余数为3的是(   )
    A、A90H B、100110B C、FFFH D、101101B
  • 5. 用Photoshop软件制作“二十四节气”作品,在“小雪”图层中已选择矩形区域,如图所示。

    下列说法正确的是(   )

    A、不能将“鹤”图层的“鹤”图像复制到新的图层中 B、删除“背景”图层,文档①处指向的值不会发生改变 C、可以使用仿制图章工具,将“图章”图层中的图像仿制到“文字”图层 D、复制“树”图层的图层样式到“小雪”图层,外发光效果只出现在“小”图像上
  • 6. 下列关于声音的数字化说法,错误的是(   )
    A、增大声音的音量,并不会影响该声音的量化位数 B、声音数字化的结果是将声音信息转换成二进制编码 C、声音文件能被压缩的原因之一是声音信息中存在时间冗余 D、对同一个声音信息采样点分别采用8位和24位量化,量化等级之比为1:3
  • 7. 现要计算出a、b之间(包含a、b)3的倍数的个数,下列VB表达式正确的是(   )
    A、b\3-(a-1)\3 B、(b-a+1)\3+1 C、(b-a)\3+1 D、(b-a-1)\3
  • 8. 某算法的流程图如图所示,执行这部分流程,则输出 c 的值为(   )

    A、3 B、4 C、5 D、6
  • 9. 有如下VB程序段:

    a(1) = 1: s = 0

    For i = 2 To 6

     s = 0

     For j = 1 To i – 1

       s = s + a(j)

     Next j

     a(i) = s + 1

    Next i

    执行该程序段后,a(6)的值为(   )

    A、15 B、16 C、32 D、64
  • 10. 有如下 VB 程序段:

    s = Text1.Text

    If Mid(s, 1, 1) = "(" Then flag = True Else flag = False

    cnt = 0: sum = 0

    For i = 2 To Len(s)

      c = Mid(s, i, 1)

      If flag = True Then

        If c >= "a" And c <= "z" Then

          sum = sum + 1

        Else

        If sum <> 0 Then cnt = cnt + 1: sum = 0

        End If

      End If

      If c = "(" Then flag = True

      If c = ")" Then flag = False

    Next i

    文本框Text1的内容为一串只包含小写字母、左右括号和空格的字符串“(we can) do (better) we (should (be )better)”,执行程序段后,变量cnt的值为(   )

    A、3 B、4 C、5 D、6
  • 11. 现有一个整数型数组a(下标1到n),其值的规律是先升序,中间相等,之后降序。现要找到降序的拐点,如数列2、4、11、15、15、15、14、11、10、8,其降序的拐点为最后一个15所在的位置,即6号位置。部分程序如下:

    L = 1: R = n

    Do While L <= R

    m = (L + R) \ 2

      If  Then

        R = m - 1

      Else

        L = m + 1

      End If

    Loop

    Text1.Text =

    为实现上述功能,则程序中方框处填写的代码是(   )

    A、a(m) > a(m + 1) 和Str(R) B、a(m) > a(m + 1) 和Str(L) C、a(m) >= a(m + 1) 和Str(R) D、a(m) >= a(m + 1) 和Str(L)
  • 12. 有如下 VB 程序段:

    For i = 1 To 5

     k = i

     For j = i + 1 To 6

     If a(j) Mod 3 <= a(k) Mod 3 Then k = j

     Next j

     tmp = a(i): a(i) = a(k): a(k) = tmp

    Next i

    数组元素 a(1)~a(6)的值依次为“62,54,35,67,15,34”。执行该程序段后,a(1)~a(6)的值依次为(   )

    A、15 54 34 67 35 62 B、54 15 67 34 62 35 C、15 34 35 54 62 67 D、15 34 67 62 54 35

二、非选择题(本大题共4小题,4+8+7+7,共26分)

  • 13. 小王收集了某商品的年度销售数据,并使用Excel软件进行数据处理,如图a所示。

    图 a

    请回答下列问题:

    (1)、区域N5:P5的数据是在N5单元格中输入公式,然后利用自动填充功能得到的,则N5 单元格中的公式可以是     (多选,填字母)。
    A、=N4/SUM(J4:J15) B、=N4/SUM($J4:$J15)*100 C、=N4/SUM(J$4:J$15)*100 D、=N4/($N$4+$O$4+$P$4)*100 E、=N4/(N4+O4+P4)
    (2)、根据图a中的数据直接制作的图表如图b所示,创建该图表的数据区域是

    图 b

    (3)、将区域A1:K15的数据复制到新工作表并进行筛选,设置渠道1、渠道2、渠道3销售额的筛选方式均如图c所示,则筛选出的月份是(填具体月份)。

    图 c

  • 14. 小李使用Flash软件创作“世界读书日”多媒体作品。请回答下列问题:
    (1)、对作品进行前期的规划设计和素材收集,下列说法正确的是 (多选,填字母:A . 确定作品的结构类型属于创作需求分析/ B . 查阅系统结构设计报告可以了解整个作品的组成部分、主要界面等/ C . Flash 软件属于以页为基础的多媒体创作工具/ D . 从网上下载背景图片并加工处理,属于媒体元素分解)。
    (2)、“片头”场景的编辑界面及“觅求真知”图层第30帧实例大小和位置属性如图所示。“觅求真知”图层第30帧到第50帧实现了“觅求真知”文字逐渐消失的动画效果,下列说法正确的是             (多选,填字母)。

    A、文字动画效果也可以使用影片剪辑类型的元件制作 B、由于第50帧实例的Alpha值被设置为0%,在元件的编辑界面下无法显示元件的内容 C、第50帧实例的宽和高分别为(56,21),位置x和y分别为(370,290),实现的动画效果是从四周向中心不断缩小 D、若将文字动画的缓动值调整为100,测试场景时,文字实现加速消失的动画效果
    (3)、现要修改“觅求真知”图层动画:文字从第30帧到第40帧逐渐消失后,又从第40帧到第50帧逐渐显示,则操作步骤为 (按操作顺序选填4个序号)

    ①将第30帧内容复制到第50帧

    ②将第50帧移动到第40帧

    ③在第50帧执行“插入空白关键帧”操作

    ④选择第40帧,创建补间动画

    ⑤选择第50帧,创建补间动画

    (4)、测试影片时,为了使该场景动画播放到最后一帧能自动跳转到本场景第1帧并继续播放,应进行的操作是 。
  • 15. 现有n*n大小的网格(n≤10),每个格子从左到右、从上到下编号依次编号为1、2、3„„n*n,当n为3时,网格如图a所示。网格中每个格子都有一面沿对角线方向放置的挡板,且朝向随机。现将一个小球从左上角1号格子自上而下射入网格,则小球将在网格中不断反弹(不考虑实际的能量损失与重力影响等因素),最终从某个格子离开网格,根据挡板的朝向与小球的运动方向,将有几种不同的反弹情况。如图b所示,小球进入网格后,先后经过1、2、5、6、3号格子,之后离开网格。

    编写VB程序,功能如下:在文本框Text1中输入n的值,单击“生成”按钮Command1,

    生成网格和随机的挡板,并输出。然后单击“开始”按钮Command2,在文本框Text2中显示小球进入网格后的运动路径。程序中利用数组a存储网格的状态,其中“/”与“\”两种字符表示两种朝向的挡板。程序运行界面如图c所示。


    图 c

    请回答下列问题:

    (1)、要使程序运行时,窗体标题显示“网格弹球”,可在Form_Load 事件过程中添加语句(单选,填字母:A . Form1 = "网格弹球" / B . Forml.Text="网格弹球"/ C . Form1.Caption="网格弹球")。
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Dim n As Integer

    Dim a(0 To 100) As String

    Private Sub Command1_Click()      '生成网格和挡板

    n = Val(Text1.Text)

    '生成 n*n 的网格和随机的挡板,并通过图形控件输出,代码略

    End Sub

    Private Sub Command2_Click()

    Dim ans As String, pre As String

    Dim cur As Integer

    cur = 1:  : ans = ""

    Do While cur >= 1 And cur <= n * n

     ans = ans + Str(cur) + "→"

    If pre = "左" And a(cur) = "\" Or pre = "右" And a(cur) = "/" Then

     cur = cur + n: pre = "上"

     ElseIf  Then

     cur = cur - n: pre = "下"

    ElseIf pre = "上" And a(cur) = "\" Or pre = "下" And a(cur) = "/" Then

     If cur Mod n = 0 Then

     Exit Do

     Else

     cur = cur + 1: pre = "左"

     End If

    ElseIf pre = "上" And a(cur) = "/" Or pre = "下" And a(cur) = "\" Then

     If   Then

     Exit Do

     Else

     cur = cur - 1: pre = "右"

     End If

     End If

    Loop

    Text2.Text = ans + "离开"

    End Sub

    (3)、程序中加框处代码有错,请改正。
  • 16. 现有n项先后出现的任务,每项任务需要一定的时间完成,且每个时刻只能执行某一项任务。任务的执行规则如下:

    每项任务有一个紧急程度,用数字表示,数字越大紧急程度越高。紧急程度最高的任务优先执行,紧急程度相同先出现先执行。若某项任务在执行过程中出现了一个紧急程度更高的任务,则正在执行的任务将被暂停,执行该紧急程度更高的任务。

    编写VB程序,功能如下:程序运行时,各项任务数据按出现时刻升序显示在列表框List1中,单击“开始”按钮Command1,按照任务完成的先后顺序,在列表框List2显示每项任务的编号以及完成时刻。程序运行界面如图所示:请回答下列问题:

    (1)、若有3个任务需要完成,数据如下:

    1号任务:时刻1出现,完成所需时长4,紧急程度1

    2号任务:时刻2出现,完成所需时长2,紧急程度2

    3号任务:时刻7出现,完成所需时长1,紧急程度3

    则这3个任务的完成的顺序为(单选,填字母:A . 1号、2号、3号 /B . 2号、3号、1号 / C . 2号、1号、3号)。

    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Dim id(0 To 100) As Integer    '任务编号

    Dim t(0 To 100) As Integer     '出现时刻

    Dim L(0 To 100) As Integer     '完成所需时长

    Dim v(0 To 100) As Integer     '紧急程度

    Dim n As Integer      '总任务数

    Private Sub Form_Load()

     '本过程读取任务编号、出现时刻、完成所需时长和紧急程度的数据分别存储在数组 id,t,L和v中,并在List1中显示,代码略

    End Sub

    Private Sub Command1_Click()

    Dim q(0 To 100) As Integer            'q 数组按优先顺序存储已出现的任务编号

    Dim k As Integer, i As Integer, j As Integer, cur As Integer

    cur = 0: k = 0             'cur 记录当前时刻

    For i = 1 To n

      Do While k > 0 And t(i) >= cur + L(q(k))            '新的任务出现时,计算并输出已经完成的任务编号

        List2.AddItem adj(2, (id(q(k)))) + adj(6, cur + L(q(k)))

        cur = cur + L(q(k))

        k = k - 1

      Loop

      If k > 0 Then L(q(k)) =        '更新正在执行的任务的完成所需时长

        k = k + 1

        j = k

      Do While v(q(j - 1)) >= v(i)

        q(j) = q(j - 1)

        j = j - 1

      Loop

      q(j) = i

       

    Next i

    Do While  

      List2.AddItem adj(2, id(q(k))) + adj(6, cur + L(q(k)))

      cur = cur + L(q(k))

      k = k - 1

    Loop

    End Sub

    Function adj(x As Integer, v As Integer) As String

     'adj可以通过添加前置空格将v转化为x位长度的字符串,便于输出对齐,代码略

    End Function