浙江省山水联盟2020届高三下学期信息技术4月返校考试试卷

试卷更新日期:2020-05-19 类型:月考试卷

一、选择题(本大题共12小题,每小题2分,共24分。)

  • 1. 下列说法不正确的是(  )
    A、计算机存储数据的基本单位是Byte B、德国数学家莱布尼兹提出了二进制记数系统 C、声音、形体动作、多媒体技术等都属于信息表达技术 D、信息具有真伪性,如“管中窥豹”是源于对信息片面的感知与理解
  • 2. 下列应用中,体现了人工智能技术的有(  )
    A、装有传感器的“智能小车”,自动沿着黑线路径行驶 B、疫情期间,“健康码”是以真实数据为基础,生成属于个人的二维码 C、“口袋动物园”是一款基于AR(增强现实)技术的儿童启蒙教育APP,可以让立体的、活生生的动物呈现出来 D、“世界很复杂,百度更懂你”,百度识图可以实现用户上传图片并在互联网上搜索与该图片相似的其他图片资源
  • 3. 某用户编辑界面如题图所示:

    下列说法正确的是(  )

    A、文档中有2个用户添加了批注 B、文档中做了2处修订 C、图片的文字环绕方式为四周型 D、第一行文字拒绝全部修订后显示为:诗歌从春鸟地啼鸣、春风春雨地吹打、春花的谢落等声音,让我们通过听觉,
  • 4. 某校建设了校园一卡通系统,采集的学生信息存储在“学生一卡通信息”数据表中,

    数据表结构及记录分别如1图和2图所示,选择右键菜单中的“新记录”并输入相应数据,下列可能作为新记录的是(  )

    A、2   0025026    张凯   是/否   2000-11-19    622     湖州湖畔小区 B、2   2125311    李军   男      1999/12/15    623     湖州爱华小区 C、9   2015121    赵欣   是/否   2000/11/25    629     湖州临海小区 D、7   2015368    王晓   女      2000\09\17    598     湖州太湖小区
  • 5. 下列有关信息编码说法,不正确的是(  )
    A、处理码是计算机内部用于信息处理的汉字代码,也称汉字机内码 B、黑白照片一类的单色的灰度图像,每个像素用一位二进制表示 C、某十六进制数n的末位是“0”,去掉该“0”后,所得的值为n/16 D、通过“采样”和“量化”可以实现声音由模拟信号向数字信号转变
  • 6. 使用GoldWave软件编辑某音频文件,部分界面如图所示。

    下列说法正确的是(   )

    A、当前声音文件的存储容量约为6.4MB B、当前状态下,执行“删除”命令后右声道的第14~19秒将出现静音 C、执行“插入静音”命令,当前状态下插入15秒静音,文件播放时有一段静音 D、执行“选定部分另存为”命令,按默认格式保存,生成的文件为双声道格式
  • 7. 生成10到50之间随机奇数,如果用随机函数Rnd产生这个数,下列表达式正确的是(  )
    A、Int(Rnd*20)*2+10 B、Int(Rnd*20)*2+11 C、Int(Rnd*40)+11 D、Int(Rnd * 2 + 1) * 25
  • 8. 某算法流程图如图所示,若输入m和n的值分别为24和9,执行这部分流程后,变量m的值为(  )

    A、3 B、6 C、9 D、1
  • 9. 下列关于VB对象的描述中,不正确的是(  )
    A、一个对象的状态是通过若干个属性来描述的 B、每个对象都有自己的行为,即对属性进行操作和处理的方法 C、对象事件的发生会驱动该对象相应事件处理过程的执行 D、不同对象的属性与方法一定不相同
  • 10. 有如下VB程序段

    Dim c As String, s1 As String

    s = Text1.Text

    s1 = ""

    For i = 1 To Len(s)

        c = Mid(s, i, 1)

        If c >= "A" And c <= "Z" Then c = Chr((Asc(c) - Asc("A")) Mod 10 + Asc("0"))

        If c >= "4" And c <= "9" Then c = Chr(Asc(c) - Asc("4") + Asc("a") + 1)

        s1 = c + s1

    Next i

    Text2.Text = s1

    在文本框Text1中输入“ELQ278yza ”,执行上述程序后,文本框Text2中输出(  )

    A、b1d2efyza B、4162efyza C、azyfe2d1b D、azyfe2614
  • 11. 数组a中存储了无序的数组元素,为了使a数组中的元素存储为左右交替上升,小赵依据选择排序思想设计了如下VB程序算法,为了实现上述功能,划线处应填入的代码为(  )

    L = 1: R = n

    Do While L < R

    imin_1 = L: imin_2 = R

        For i = L + 1 To R

            If a(i) < a(imin_1) Then

               imin_2 = imin_1

               imin_1 = i

            ElseIf a(i) < a(imin_2) Then

               imin_2 = i

            End If

        Next i

        If imin_1 <> L Then t = a(imin_1): a(imin_1) = a(L): a(L) = t

        ____________________

        If imin_2 <> R Then t = a(imin_2): a(imin_2) = a(R): a(R) = t

        L = L + 1: R = R - 1

    Loop

    A、If imin_1 = L Then imin_1 = imin_2     B、If imin_1 = L Then imin_2 = imin_1 C、If imin_2 = L Then imin_1 = imin_2   D、If imin_2 = L Then imin_2 = imin_1
  • 12. 某对分查找算法的VB程序段如下:

    Dim a(1 To 10) As Integer

    Key = Int(Rnd * 32) * 3 + 3

    s = 0: i = 1: j = 10

    Do While i <= j

        m = (i + j) \ 2

        If Key = a(m) Then Exit Do

        If Key > a(m) Then

            i = m + 1: s = 3 * s + 2

        Else

            j = m - 1: s = 3 * s

        End If

    Loop

    数组a(1)到a(10)的值依次为“4,7,9,15,24,32,37,54,75,90”,执行该程序段后,s的值不可能为(  )

    A、20 B、80 C、62 D、18

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

  • 13. 小许收集了2011年至2018年全国各级各类学历教育招生数数据,并使用Excel软件进行了数据处理。如图a所示,请回答下列问题:

    图a

    (1)、如图a所示,若因误操作在“普通本科”和“普通专科”两列之间插入一个空白列,图中原R7单元格的计算公式(=Q7/$Q$12)将(选填:A .保持原公式不动! B .显示#REF!  C .公式变为=R7/$R$12  D .公式变为=R7/$Q$12)。
    (2)、在对“8年合计”行进行由B12单元格自动向右填充的时候漏了“技工学校”这一单元格。小许的做法是,对B12单元格进行复制,然后在P12单元格上右键,选中如图b所示的第三个fx按钮。操作结束后,选中P12单元格,此时公式编辑栏中显示的内容为

    图 b

    (3)、下列说法或操作正确的是________________(多选,填字母)

    图c

    A、Q12单元格显示“#######”的问题,是因为P12单元格为空造成的。 B、小许想知道“每年招生占8年招生比重”的最小年份,他选择A4:R11作为排序区域(按图c操作),列R为主要关键字,进行升序排序,排在第一个的就是。 C、小许想筛选出普通本科招生人数大于400万人的年份,他的操作是:将A1:R11数据复制到新工作表中,选中D3:D11区域,然后点击筛选按钮并按要求进行条件筛选。 D、小许对列R进行最小10%筛选,虽然结果计算出来不满1个,但是还是能筛选出一个结果。 E、先对博士列进行大于等于7,再对网络专科列大于等于150,和先对网络专科列大于等于150,再对博士列进行按大于等于7进行筛选,两个结果是一样的。
  • 14. 小华为宣传家乡的美丽生态环境,创作了一个“人与自然”的多媒体作品,他首先用Photoshop制作了一张背景图片,然后用Flash制作动画,其“和谐”场景的制作脚本如下:

    1图

    请回答以下问题:

    (1)、用Photoshop制作动画背景时,发现“树”缺少右边部分,如2图所示。为了补上树的右边部分,可通过复制“树左”图层,然后执行 操作(选填:旋转180度/旋转90/水平翻转/垂直翻转)来实现。

    2图

    (2)、将3图所示的背景图片保存为JPEG格式后,则图层“美丽的家乡”图层样式效果为

    3图

    (3)、在Flash动画编辑中,小华在music图层插入“蝴蝶泉边.mp3”素材,设置如4图所示,当影片播放到80帧并停止之后,音乐将(选填:会/不会)继续播放。

    4图

    (4)、在1图的动画库中共有种元件类型,测试影片时,“蝴蝶1”与“蝴蝶2”同时从画面左边飞向右边,在飞行过程中“蝴蝶1”中途停留了约 秒后,然后再继续飞行。
    (5)、如1图所示,在“蝴蝶2”图层的第80帧上设置了帧命令 ,使动画播放结束暂停。
    (6)、为了让“退出”按钮具有关闭动画的功能,小华需在“退出”按钮上添加的动作为 ,在确保添加了正确的退出命令后,然后选择控制菜单下的“测试影片”,发现点击“退出”按钮并不能关闭动画,原因是
  • 15. 输入一段长度为n的英文字母,对其进行某种加密方法,描述如下:

    ⑴将原文转换为若干行m列(m为奇数)的矩阵,最后一行若不足m个数据则以“#”填充。

    ⑵将矩阵中的数据,从末行末列数据开始以回路的方式提取字符。按顺序生成加密字符。例如对字符“helloworld”,m=3的加密过程如下图,其加密结果为“#lwleor#dolh”

     

    程序窗口界面如图:

    请回答下列问题:

    (1)、字符串“helloworld”经过加密后密文为“dollrleowh”,则加密矩阵列数m为
    (2)、上述加密算法对应解密的VB程序代码如下,请在划线处填入合适的代码。

    Private Sub command1_click()

        Dim a As String, n As Integer, yw As String

        Dim i As Integer, j As Integer

        Dim index As Integer, k As Integer, x As Integer

        s = Text1.Text '文本框text1中为待解密的字符串

        m = Val(Text2.Text)

        n = Len(s)

        yw = ""

        k = 0

        x = n / m

        For i = 1 To

            index = n - i + 1

            yw = yw + Mid(s, index, 1)

            For j = 2 To m

                IfThen

                    index = index - 2 * (x - i) - 1

                Else

                    index = index - 2 * (i - 1) - 1

                End If

                If Mid(s, index, 1) = "#" Then

                  yw = yw + Mid(s, index, 1)

            Next j

        Next i

        Label1.Caption = Mid(yw, 1, Len(yw) - k)

    End Sub

  • 16. 有m(2≤m≤n)个音箱,直线放在n(n≥2)个位置上,第i个位置坐标在a(i)上。每两个音箱相互靠近就会产生干扰,为了解决这个问题,决定把每个音箱都放在离其他音箱尽可能远的位置。为了使任意两个音箱之间的最小距离尽可能大,设计了下面的程序。程序实现了任意两个音箱之间最大的最小距离。如有5个位置,5个位置分别为1,2,8,4,9,有3个音箱,那么最大的最小距离就为3,可以将3个音箱分别放在1,4,8的位置上。

    (1)、如果这5个位置分别为5,19,2,18,9,那么3个音箱可以放置的最大的最小距离为
    (2)、在划线处补上代码。

    Dim a(1 To 5) As Integer

    Dim n, k As Integer

    Private Sub Form_Load()

        n = Val(Text1.Text): k = Val(Text2.Text)

        ’随机生成n(n>=2)个不重复的0及以上的数字赋值给数组a,代码略

    End Sub

    Private Sub Command1_Click()

    Dim m, l, r As Integer

    For i = 1 To n

        For j = 1 To n - i

            If a(j) > a(j + 1) Then

                t = a(j): a(j) = a(j + 1): a(j + 1) = t

            End If

        Next j

    Next i

    l = 1: r = a(n) - a(1)

    Do While l <= r

        m = (l + r) \ 2

        If  Then

            l = m + 1

        Else

            r = m - 1

        End If

    Loop

    Label1.Caption = Str(r)

    End Sub

    Function check(ByVal d As Integer) As Boolean

        Dim cow, rgt As Integer

        cow = 1

        rgt = a(1) + d

        For i = 2 To n

            If a(i) >= rgt Then

                cow = cow + 1

                      ①     

            End If

        Next i

        If      ②      Then

            check = True

        Else

            check = False

        End If

    End Function

     ② 

    (3)、有一句带框框的代码有误,请修改为正确代码,让程序可以符合题意。