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

浙江省2020届高三下学期技术4月联考试卷

更新时间:2021-05-20 浏览次数:226 类型:月考试卷
一、选择题(本大题共12小题,每小题2分,共24分。在每小题给出的四个选项中,只有一个符合题目要求,不选、多选、错选均不得分)
  • 1. 下列有关信息和信息安全的说法,错误的是(  )
    A . 日常生活中随便填写传单资料存在信息被泄露的风险 B . 网络上的信息不能随意转发 C . 高考试卷设置为绝密等级的目的是防止信息在共享过程中产生损耗 D . 信息不可以脱离载体而单独存在
  • 2. 下列应用中,体现人工智能技术的有(  )

    ①使用某软件识别拍摄植物照片并返回该植物相关信息

    ②使用Word软件的查找替换功能把某文档中所有的“博客”替换为“Blog”

    ③使用某软件过程中用语音方式设置闹钟

    ④使用微信的视频聊天功能和朋友进行交流

    ⑤人与人在围棋APP平台上对弈

    A . ①②③ B . ①③⑤ C . ①③ D . ①⑤
  • 3. 使用Access软件打开数据表,部分界面如图所示。

    下列说法正确的是(  )

    A . “卡号”字段属于“文本”类型,故“卡号”的字段值可以相同 B . “卡状态”字段的有效输入值可以为“已挂失” C . 数据表中每一行称为一条记录,该数据表有6条记录 D . 当前状态下不可以对“校园卡信息”数据表重命名
  • 4. 使用UltraEdit软件观察字符内码,部分界面如图所示。

    下列说法正确的是(  )

    A . 字符“!”的内码占两个字节 B . 字符“你”的交换码是“C4E3” C . 字符“2”在计算机内部是以十六进制“32”存储的 D . 图中共有6个ASCII码字符
  • 5. 小明进行音频文件创作时遇到以下问题:

    ①选中区域的音量和其它部分不一致,如图a;

    ②选中区域的部分为不需要的信号,需要去除,如图b。

    解决以上问题选择命令较合理的是(  )

    A . ①淡入 ②剪裁 B . ①更改音量 ②删除 C . ①淡出 ②静音 D . ①更改音量 ②剪裁
  • 6. 新建某声音文件如图所示,直接保存为wave格式,文件大小约为10M,则该声音文件的量化位数是(  )

    A . 8 B . 16 C . 24 D . 32
  • 7. a,b都是正整数,若a*b Mod 2=0为真,则下列说法错误的是 (  )
    A . (a+b)\2-(a+b) \2Mod 2可能是奇数 B . a与b至少有一个是偶数 C . (a+b)\2-((a+b)\2+1) Mod 2一定是奇数 D . Int(Rnd*a) +b可能是偶数
  • 8. 某算法部分流程图如图所示。执行这部分流程,则输出c的值是(  )

    A . 6 B . 7 C . 8 D . 9
  • 9. (2020高三下·浙江月考) 有如下VB程序段:

    s=Text 1.Text

    ans=0

    Text 2.ext=Str(ans)

    若Text 1中输入的内容为“10”则Text 2中输出的内容为“2”,加框处代码,不正确的是(  )

    A . B . C . D .
  • 10. (2020高三下·浙江月考) 有如下VB程序段:

    For i= 1 To 18

         a(i) =True

    Next i

    For i= 2 To 18

         For j= 1 To 18\i

             a(i*j) =Not a(i*j)

         Next j

    Next i

    For i= 1 To 18

        If a(i) Then c=c+1

    Next i

    Text 1.Text=Str(c)

    该程序段运行后,文本框Text 1中显示的内容是 (  )

    A . 2 B . 3 C . 4 D . 5
  • 11. 有如下VB程序段:

    Dim a( 1 To 4) As Integer,m As Integer,n As Integer

    m=100:n=4

    Randomize

    For i=1 To n-1

        x=Int(Rnd *n) + 2

        a(i)=m\x

        m=m-a(i)

    Next i

    a(i)=m

    该程序段运行后,数组a中各元素的值不可能的是(  )

    A . 20,16,12,52 B . 25,18,14,43 C . 33,22,9,36 D . 50,25,4,21
  • 12. (2020高三下·浙江月考) 有如下VB程序段:

    i=1:j=10

    Key=Val(Text 1.Text)

    If Key Mod 2=1 Then t=1 Else t=-1

    Do While i<=j

        m=(i+j)\2

        c=c+1

    If t= 1 And a(m) Mod 2= 0 Then

        j=m-1

    ElseIf t=- 1 And a(m) Mod 2= 1 Then

        i=m+1

    ElseIf Key*t<a(m) *t Then

        j=m-1

    Else

        i=m+1

    End If

    Loop

    若数组a(1)到a(10)的值依次为1,3,5,7,9,18,18,16,4,0,若Text 1中输入2,执行该程序段后,下列说法正确的是(  )

    A . c=4 B . m的值依次为5,8,9 C . i=2 D . m的值依次为5,2,1
二、非选择题(本大题共4小题,4+8+7+7,共26分)
  • 13. 小范同学对2018年浙江省各地市的户籍人口年龄构成进行调查,并用Excel软件对调查数据进行处理,如图a所示。

    1. (1) 将C4单元格中的公式复制至I15单元格,再向上自动填充至区域I4:I15,则单元格I4中的公式为
    2. (2) 60岁以上人口的占比越高说明该地区人口老龄化越严重,若要将图中数据按照人口老龄化程度排序,则排序区域应设置为(单选,A .A4:J15/B .A2:J15/C .B3:I15/D .A5:J15)。
    3. (3) 根据图a中的数据直接建立了如图b所示的柱形图,则创建该柱形图的数据区域为

    4. (4) 若选中区域B3:I15,分别对C列和E列设置筛选,筛选条件如图c和图d所示,则筛选结果有项。

       

  • 14. (2020高三下·浙江月考) 小林使用Flash软件制作了“毕业”题材的多媒体作品,他先用Photoshop软件制作相关素材,然后使用Flash制作动画。请回答以下问题:
    1. (1) 关于多媒体作品设计,下列说法正确的是     (单选,填字母)。
      A . 确定作品主题思想属于应用需求分析 B . 文字脚本是多媒体作品制作的直接依据 C . 作品的功能模块设计描述了整个作品的组成部分、工作流程、主要界面 D . 多媒体作品设计的一般过程:需求分析→规划设计→脚本编写
    2. (2) 如图a所示,在当前状态下,以下说法正确的是(多选,填字母:A .存储为BMP格式的图片后,图中每个像素点需要8位二进制存储/B .使用“橡皮擦”工具可以将“背景”图层修改为白色/C .设置“背景”图层不可见,可以存储为透明背景的PNG格式图片/D .不能改变“背景”图层和“图层4”之间的顺序/E .直接将“背景”图层设置为完全锁定,则“背景”图层将不能删除)。

    3. (3) 如图b所示,“纸飞机3”图层中实现了“纸飞机”从右下角飞向左上角并逐渐变小的动画,则该动画的动画类型为

    4. (4) 测试影片时发现“load”场景中的按钮在动画过程中一直出现,若要使按钮只出现在“load”场景动画的最后,按钮出现的同时动画停止并等待按钮响应,在不改变其他动画的效果的前提下,可进行的操作是
    5. (5) 测试影片时,单击“load”场景的按钮,音乐停止并跳转至“main”场景的第1帧继续播放,已知“load”场景“声音”图层中音频的同步方式为“事件”,则该按钮的动作脚本为
  • 15. (2020高三下·浙江月考) 小周尝试一种新的数据排序方法,先将数据按照增量分成若干组,再分别对这几组数据进行排序并通过缩小增量直到增量为1的方法实现最终排序。如若要将数据“71,54,58,29,31,78,2”升序排序,增量的初值为3,则数据分为3组,为“71,29,2”“54,31”“58,78”,分别对各组数据排序后变为“2,31,58,29,54,78,71”,更新增量为1,最终通过后续处理实现排序。

    待排序数据存储在数组a中(a(1)…a(n)),共有n个数据,要求升序排序

    Dim a(0 To 100) As Integer

    Dim n As Integer

    Private Sub Command 1_Click()

        Dim i As Integer,m As Integer

        m=n\2

        Do While  '改错

           For i=1To m

              Call jpsort(i,m)    '调用过程jpsort()

           Next

            m=m\2

        Loop

       

    '显示输出结果

    End Sub

    Private Sub jpsort(start As Integer,w As Integer)

             For i=start To n Step w

             For j= To i+w Step-w    '填空

                 If a(j-w) >a(j) Then

                    t=a(j-w)::a(j)=t    '填空

               End If

           Next

        Next

    End Sub

    请回答以下问题:

    1. (1) 若要修改窗体上显示的内容为“跳跃排序”,应修改的属性名是(单选,填字母:A .Text/B .Caption/C .Load) 。
    2. (2) 划线部分的代码应填①;②;③
    3. (3) 若将虚线框中的程序段删除并要求使排序的结果不变,则应将Do While语句加框处的代码修改为
  • 16. (2020高三下·浙江月考) 图a是一个“挖地雷”游戏的界面,9×9个格子里都有一个数字,红旗代表地雷可以用“-1”表示,图中共有10个地雷,“0”表示空白,所有数字的含义是以该数字格子为中心的3×3区域中地雷的个数。

    小陈根据上述的描述设计了以下的程序,界面如图b所示,单击“初始化”按钮Command 1,按要求生成相关数据存储在数组a中并在列表框List 1中显示,该程序中最外圈不能有地雷,单击“计算”按钮Command 2,对数组a中的数据进行计算并在列表框List 2中输出,输出数据元素的宽度为固定值。

    请回答问题:

    1. (1) 单击“初始化”按钮Command 1后,数据a中的数据在List 1中显示,效果如图c所示,单击“计算”按钮Command 2后数组a中数值为3的元素个数有个。
    2. (2) 请在划线处填入合适的代码。

      Const n=9:Const m= 10    'n存储地雷区域大小,m存储地雷数目

      Dim a(1 To n*n) As Integer

      Private Sub Command 1_Click()

      '按要求生成数组a中的数据并在List 1中显示,代码略

      End Sub

      Private Sub Command 2_Click()

      Dim i As Integer, j As Integer, row As Integer

      Dim col As Integer, start As Integer, temp As String

      For i=1 To n *n

           IfThen

               row=(i-1)\n+ 1

               col=(i-1)Mod n+ 1

               For j= 1 To 3

              

               If a(start+col-1) >-1Then a(start+col-1) =a(start+col-1)+1

              If a(start+col) >-1Then a(start+col) =a(start+col)+1

              If a(start+col+1)>-1Then a(start+col+1) =a(start+col+1)+1

            Next j

          End If

      Next i

      List 2.Clear

      For i=1To n

              temp=“”

              For j=1To n

                   temp=temp+adj(a((i-1) *n+j),3)

              Next j

              List 2.Add Item temp

      Next i

      End Sub

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

              Dim s As String

              s=Str(x)

              For i= 1 To

                   s=“”+s

              Next i

              adj=s

      End Function

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

试卷信息