当前位置: 高中信息技术 /备考专区
试卷结构: 课后作业 日常测验 标准考试
| 显示答案解析 | 全部加入试题篮 | 平行组卷 试卷细目表 发布测评 在线自测 试卷分析 收藏试卷 试卷分享
下载试卷 下载答题卡

浙江省之江教育评价2020-2021学年高三下学期信息技术返...

更新时间:2021-03-31 浏览次数:137 类型:开学考试
一、选择题(本大题共12小题,每小题2分,共24分。)
  • 1. 下列关于信息的说法,错误的是(    )
    A . 计算机处理数字化后的信息通常需要软件支持 B . 信息可以传递和共享,在传递过程中可以有多种方式 C . 信息本身是看不见摸不着的,因此不可以用某种方式表现 D . 信息的表达技术有电视、广播、微信、微博、QQ等
  • 2. 下列关于网站与网页描述正确的是(    )
    A . 保存网页就是收藏网页地址 B . HTTP语言可以描述网页内容 C . 以“网页,仅HTML”方式保存网页,可以保存网页中的超链接、表格和图片 D . 记事本可以编辑网页,IE浏览器可以解析网页内容
  • 3. 使用Access软件建立某物资信息管理的数据库,其中“抢险人员”表如图所示。下列说法错误的是(    )

    A . 当前状态下,可以对“抢险人员”数据表进行重命名 B . 添加一条新记录,该记录的“ID”字段值不一定是8 C . 在数据表视图下,删除“姓名”字段,此操作不可以撤销 D . 若将“性别”字段类型修改为“文本”,该字段值会变为True或者False
  • 4. 使用 UltraEdit 软件查看字符内码,部分界面如图所示。下列说法正确的是(    )

    A . 大写字母“R”对应的内码值为52 68H B . 小写字母“z”对应的内码值为80H C . 图中共有10个ASCII码字符 D . 字符“!”的内码二进制形式为10100011 10100001B
  • 5. 用Goldwave软件编辑某音频文件,部分界面如图所示,下列说法正确的是(    )

    A . 执行“删除”操作,音频时长减少3秒 B . 先执行“复制”操作,再执行“粘贴”操作后,音频时长增加3秒 C . 执行“静音”操作后直接保存,音频文件的存储容量变小 D . 执行“剪裁”操作后直接保存,音频文件的存储容量变为原来的4/5
  • 6. 将一段时长为5秒,320×240像素、24位真彩色,PAL未经压缩的AVI格式无声视频文件,压缩为MP4格式后的文件大小为300KB,则其压缩比约为(    )
    A . 4∶1 B . 19∶1 C . 94∶1 D . 112∶1
  • 7. VB表达式Int(Sqr(26) + 0.5) * 3 Mod 16 \ 2 ^ 2的值是(    )
    A . 3 B . 2 C . 9 D . 6
  • 8. 某算法的部分流程图如图所示。执行这部分流程,输出y的值是(    )

    A . 28 B . 29 C . 30 D . 31
  • 9. 有如下VB程序段:

    Dim t As Integer, s As String, i As Integer

    s = "20PYt22hoN"

    t = 0

    For i = 1 To Len(s)

        c = Mid(s, i, 1)

        If c >= "a" And c <= "z" Then c = Chr(Asc(c) - 32)

            If c >= "A" And c <= "Z" Then

                t = t + 1

            Else

                t = t - 1

        End If

    Next i

    Text1.Text = Str(t)

    执行该程序段后,文本框Text1中显示的内容是(    )

    A . -1 B . 0 C . 1 D . 2
  • 10. 有如下VB程序段:

    Dim a(1 To 10) As Integer

    Dim i, j As Integer

    For i = 1 To 10

        j = i

        Do While j <= 10

            If j Mod i = 0 Then

                a(j) = a(j) + 1

            End If

            j = j + 1

        Loop

    Next i

    Text1.Text = Str(a(3))

    数组a各元素初值为0,执行上述程序段后,文本框Text1中显示的内容为(    )

    A . 1 B . 2 C . 3 D . 4
  • 11. 采用选择排序算法对某数据序列进行排序,经过第一轮排序后的结果是“2,8,3,7,5,6,9”,那么原数据序列不可能是(    )
    A . 3,8,2,7,5,6,9 B . 5,8,3,7,2,6,9 C . 8,3,2,7,5,6,9 D . 2,8,9,7,5,6,3
  • 12. 有如下VB程序段:

    key = Val(Text1.Text)

    i = 1: j = 9

    Do While i < j

        m = (i + j) \ 2

        If      Then

            i = m + 1

        Else

           

        End If

    Loop

    Label1.Caption = Str(i)

    已知数组a存储一组升序数“2,5,9,11,13,15,18,23”。要查找第一个大于key的元素的下标并输出,则下列选项中正确的是(    )

    A . ①a(m) <= key     ②j = m B . ①a(m) < key      ②j = m - 1 C . ①a(m) <= key     ②j = m - 1 D . ①a(m) < key      ②j = m
二、非选择题(本大题共4小题;4+8+7+7;共24分。)
  • 13. 某艺术院校举行了三个类别的艺术校考面试,并用Excel软件进行数据处理,如图a所示。

     

    请回答下列问题:

    1. (1) 总分是将“理论知识”成绩的10%与“专业问答”、“表演技能”的成绩按权重比例3:2:5相加所得。通过F3单元格中的公式,对数据区域F4:F59进行自动填充,则F3单元格中的公式为
    2. (2) 根据图a中的数据制作的图表如图b所示,创建该图表的数据区域是

    3. (3) 为了找出“歌唱类”中“专业问答”最高的3个报名号(若存在符合条件的多个报名号,则全部选取),下列操作可以实现该效果的是       (填字母)。
      A . 以“类别”为歌唱类,“专业问答”为最大3项进行筛选,然后选取筛选出的全部项。 B . 以“类别”为歌唱类进行筛选,再以“专业问答”为主要关键字降序排序,选取排在最前面的3项。 C . 以“专业问答”为主要关键字,“类别”为次要关键字,均按降序排序,选取排在最前面的3项。 D . 以“专业问答”为主要关键字降序排序,再以“类别”为歌唱类进行筛选,选取排在最前面的3项。
  • 14. 小明制作主题为“抗击疫情”的多媒体作品,首先使用Photoshop处理图片,然后使用Flash软件制作动画。请回答下列问题:
    1. (1) 处理图像的部分界面如图a所示。下列说法正确的有            (多选,填字母)。

      A . 能直接删除“背景”图层 B . 调整“抗击疫情”图层不透明度为50% C . 将“抗击疫情”移动到“背景”图层下方 D . 可复制“人物”图层的图层样式并粘贴到“抗击疫情”图层 E . 使用“自由变换”工具仅调整“文字”图层“关心”的字体大小
    2. (2) 在Flash软件中编辑“主交互界面”场景,部分界面如图b图所示。“标语”图层的第1帧至25帧的补间动画实现了由文字“中国加油!”渐变为“抗击疫情从我做起”的效果,则该补间类型为(选填字母:A .动画补间/B .形状补间)。

    3. (3) 测试场景时,要使“标语”中的补间动画持续3秒,应进行的操作是
    4. (4) “音乐”图层第1帧添加了音乐“bj.mp3”,测试场景时,小明(选填字母:A .能/B .不能)听见声音。
    5. (5) 测试影片时,单击“不信谣”按钮,跳转到“不信谣”场景第10帧继续播放,并打开位于同一目录下的“bxy.doc”文件,则“不信谣”按钮上添加的动作命令是
  • 15. 某学校进行问卷调查,共n个班级,现将参与问卷调查的学生名单在文本框Text1中按照“班级编号+姓名”的方式连续输入。单击“查询”按钮,统计每个班参与问卷调查的人数。在列表框List1中按“参与人数”降序输出,当“参与人数”相同时,按班级编号升序输出。程序运行界面如图。实现上述功能的VB程序段如下:

    Private Sub Search_Click()

        Const n = 12

        Dim s As String, c As String

        Dim i As Integer, t As Integer

        Dim rs(0 To n) As Integer       '数组rs存储班级人数

        Dim bj(1 To n) As Integer       '数组bj存储班级编号

        Dim flag As Boolean

        s = Text1.Text

        t = 0

        For i = 1 To Len(s)

            c = Mid(s, i, 1)

            If c >= "0" And c <= "9" Then

                t =      ①        

                flag = True

            ElseIf flag = True Then

                rs(t) = rs(t) + 1

                flag = False

                t = 0

            End If

        Next i

        For i = 1 To n

            bj(i) = i

        Next i

        For i = 1 To n-1

            k = i

            For j = i + 1 To n

                If       ②       Then k = j

            Next j

            If k <> i Then

                t = rs(k): rs(k) = rs(i): rs(i) = t

                t = bj(k): bj(k) = bj(i): bj(i) = t

            End If

        Next i

        For i = 1 To n

            List1.AddItem Str(bj(i)) + "班有:" + " " +  + "人"

        Next i

    End Sub

    1. (1) 本程序中的事件处理过程名是
    2. (2) 完善程序,在划线处填写正确代码。

       ② 

    3. (3) 程序代码中,加框处有错,请改正。
  • 16. 某数据查找程序:在文本框Text1和Text2中分别输入矩阵的行数m和列数n,单击“产生”按钮,随机产生m×n个范围是[1,10]的整数,并在列表框List1中以矩阵显示。在文本框Text3中输入整数数据key,单击“查找”按钮,将查找key在矩阵中的位置,并在列表框List2中输出查找结果。例如矩阵行数为7,矩阵列数为4,查找数据为3,程序运行界面如图所示。

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

      Dim a(1 To 100) As Integer

      Dim m As Integer, n As Integer

      Private Sub Command1_Click()

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

          Dim s As String

          m = Val(Text1.Text)

          n = Val(Text2.Text)

          Randomize

          For i = 1 To m

              For j = 1 To n

                  x = Int(Rnd * 10 + 1)

                   

              Next j

          Next i

          s = ""

          For i = 1 To m * n

              s = s + Str(a(i))

              If i Mod n = 0 Then

                  List1.AddItem s

                   

              End If

          Next i

      End Sub

      Private Sub Command2_Click()

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

          Dim key As Integer, flag As Boolean

          key = Val(Text3.Text): flag = False

          For i = 1 To m * n

              If key = a(i) Then

                  x = (i - 1) \ n + 1

                  y =  

                  list2.AddItem Str(key) + "的坐标为:第" + Str(x) + "行,第" + Str(y) + "列"

                  flag = True

              End If

          Next i

          If Not flag Then

              list2.AddItem "未查找到相应数据!"

          End If

      End Sub

    2. (2) 若随机产生矩阵 ,查找数据为3,则在列表框List2中显示内容是

微信扫码预览、分享更方便

试卷信息