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

浙江省普通高校招生选考科目信息技术考试模拟卷(一)

更新时间:2021-09-26 浏览次数:153 类型:高考模拟
一、选择题(本大题共12小题,每小题2分,共24分。)
  • 1. 下列有关信息和信息技术的说法,不正确的是(    )
    A . 书本里的文字是信息的载体 B . 计算机中的文字、视频等均采用二进制代码存储 C . 文字、语言、手势均是信息表达技术 D . 物联网、云计算、人工智能均应用了信息技术
  • 2. 下列有关网页与浏览器的说法,不正确的是(   )
    A . 用浏览器能浏览、编辑网页 B . 电子邮件地址可以作为网页里的链接目标 C . 使用浏览器访问网页时需用到HTTP协议 D . 编写网页使用的语言是HTML
  • 3. 使用Word软件编辑某文档,部分界面如图所示:

    下列说法正确的是(    )

    A . 批注的用户名是tzzx1 B . 删除批注框里的批注内容“计算机程序设计语言”,则批注框会消失 C . 共有3处修订 D . 在当前状态下,选择拒绝插入,则正文第四行中仅“由于"两字会消失
  • 4. 某Access数据表的数据表视图与设计视图部分截图如图所示,下列描述正确的是(    )

    A . 序号字段值只能是数字,但可以相同 B . 存储“性别”字段需要1Byte C . “基本工资"字段值可输入6000 D . 当前选中的是数据表里的第4条记录
  • 5. 使用GoldWave软件打开某音频文件,其部分编辑界面如图所示。

    下列说法正确的是(    )

    A . 该音频的采样频率为1411KHz,量化位数为16位 B . 当前状态下执行“静音"操作,以当前参数保存,音频文件容量将保持不变 C . “全选"左声道,单击“删除”后文件存储容量变为原来的1/2 D . 当前状态下执行“删除"操作,再执行插入20秒*静音"操作,声音时长不变
  • 6. 使用Photoshop软件处理图像,编辑界面如下图所示,下列说法正确的是(    )

    A . 当前状态下,可以用“自由变换”命令改变“琵琶”图层中的对象大小 B . 使用“图像大小”命令将图像缩小到原来的80%,“背景"图层中的图像大小不会改变 C . “背景"图层可删除,但不能编辑里面的内容 D . 保存为bmp格式后,文件大小约为501.6KB,且“江南水”图层“投影”效果不可见
  • 7. VB表达式Int(Rnd* 10)+54>9/3的值可能是(    )
    A . 18 B . 12 C . 28 D . 11
  • 8. 某算法流程图如图所示,执行该算法后,最后输出s的值为27,则下列说法中不正确的是(    )

    A . 所输入的x的值为16 B . s←s+x被执行了2次 C . x>8被执行了2次 D . 算法结束时,x的值为4
  • 9. 有如下程序段:

    m = Text1.Text

    For i= 1 To Len(m)

        c= Mid(m,i, 1)

        If c>= "0" And c<= "9" And i Mod 2 = 0 Then k=1 Else k= 2

        a(k)= a(k)+ 1

    Next i

    数组a各元素的初始值都为0,文本框Text1上输入内容为“9+ ILM2019IT”(不包含双引号)。该程序段运行后,a(2)的值为(     )

    A . 6 B . 2 C . 9 D . 5
  • 10. 素数是指在大于1的自然数中,除了1和它本身以外不再有其他因数的自然数。判断是否是素数的VB程序段如下:

    n = Val(Text1.Text)

       

    For i=2 To n- 1

        If n Mod i= 0 Then

            a= False

           

        End If

    Next i

    If  Then Label1.Caption = "不是素数" Else Label1.Caption = "是素数"

    程序段中有3处加框的地方需要完善代码,现有如下代码:

    ①Exit For

    ②a=True

    ③a = False

    则程序段里从上往下方框里的代码分别是(    )

    A . ①②③ B . ②①③ C . ③①② D . ③②①
  • 11. 某VB程序段如下:

    n= 6

    For i= 1 To 2

        k=i

        j=i+ 1

        Do While j<= 3

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

            j=j+ 1

        Loop

        If i<> k Then

            t= a(i): a(i) = a(k): a(k)= t

        End If

        m=n-i+ 1

        For j= m- 1 To 4 Step -1

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

        Next j

        If m<>n-i+ 1 Then

            t= a(n-i+1):a(n-i+ 1)= a(m): a(m)= t

        End If

        t= a(i): a(i)= a(n-i+ 1):a(n-i+ 1)=t

    Next i

    数组元素a(1)到a(6)的初始值依次为“39,40,35,21,33,32”,运行程序后,a(4)的值是(    )

    A . 39 B . 35 C . 33 D . 32
  • 12. 某VB程序段如下:

    i= 1:j= 6:key=8

    Do While i<= j

        m=(i+j)\2

        If a(m)<key Then

            j=m- 1

        Else

            i=m+ 1

        End If

    Loop

    数组元素a(1)到a(6)的值依次为“9,8,8,8,7,6”,运行该程序段后,下列说法正确的是(    )

    A . 可以找到数值8开始出现的位置,该位置信息由变量i指示 B . 可以找到数值8最后出现的位置,该位置信息由变量i指示 C . 可以找到数值8开始出现的位置,该位置信息由变量j指示 D . 可以找到数值8最后出现的位置,该位置信息由变量j指示
二、非选择题(本大题共4小题,4+8+7+7,共26分)
  • 13. 使用Excel软件对各班成绩进行处理,部分界面如图a所示。请回答下列问题:

    图 a

    1. (1) 区域14:I13的数据区域是通过公式计算得到的,则可先在14单元格中输入计算公式 (要求使用SUM函数),再利用自动填充完成区域I5:I13的计算。(提示:优秀人数所占比例(%) = 某个班级的统练1优秀人数/所有班级的统练1优秀人数*100)。
    2. (2) 要对图a中的数据按照“最高分"进行降序排序,则应该选择的排序数据区域是
    3. (3) 根据图a中数据制作了如图b所示的图表,该图表的数据区域为

      图 b

    4. (4) 如图a所示,对数据进行筛选操作,自动筛选“统练1”最大的4项,筛选设置如图c所示,则按此设置筛选出的班级共有个。

      图 c

  • 14. 小杨使用Photoshop 和Flash软件制作了一个有关中秋节主题的动画,请回答下列问题:
    1. (1) 在Photoshop中处理图片,其图层面板如图a所示,以下说法正确的有         (多选,填字母)

      图 a

      A . “背景”图层可直接删除 B . 用“橡皮擦工具”擦除“背景”图层里面所有内容,存储为gif格式,可得到背景透明的图片 C . 在使用“自由变换工具”调整“地球”图层里的内容时,其他图层不受影响 D . “中秋”图层上不能直接添加滤镜效果 E . 给“月球”图层添加图层样式效果,“地球”图层不受影响
    2. (2) 如图b所示,“文字”图层的补间动画类型为。(单选,填字母:A .动画补间/B .形状补间/C .逐帧动画)

      图 b

    3. (3) 测试影片时,发现动画播放到最后一帧即停止,但音乐还在继续播放,则动画里的音频的同步方式设置为(数据流/事件)。
    4. (4) 测试影片时,发现“文字”图层上的文字一开始就出现在舞台上,若要使“文字”图层的文字在动画开始1秒后才出现,则应该进行的操作:
    5. (5) 单击“按钮”图层上的“退出”按钮时关闭动画,则该按钮上对应的脚本命令是 。
  • 15. 小林编写了一个用于1至9之间整数加减乘除运算的小程序,具体功能如下:在文本框Text1中输入一个算术表达式(该表达式仅包含1至9之间的整数和加减乘除运算符,其中最后一个运算符肯定是乘或除,且乘或除运算符的前和后一个运算符仅可能为加减或没有),单击“计算”按钮Command1,将运算结果显示在Label2中。程序运行界面如图所示,实现上述功能的VB程序如下,请回答下列问题:

    1. (1) 将窗体标题更改为“简单算术运算",应修改窗体的属性的属性值。
    2. (2) 请在划线处填入合适的代码。

      Private Sub Command1_ Click()

          Dims As String, c As String, i As Integer

          Dim sum As Single, sum1 As Single, sum2 As Single, k As Integer,j As Integer

          s = Text1.Text : sum2=0:k= 1

          For i= 1 To Len(s)

              c=

              If c= "*" Or c= "/" Then

                  If c="*" Then

                      sum = Val(Mid(s,i+ 1, 1)) * Val(Mid(s,i- I, 1))

                  Else

                      sum = Val(Mid(s, i- 1, 1))/ Val(Mid(s,i+ 1,1))

                  End If

                  j=i-2

                  Do While

                      c = Mid(s,j, 1)

                      If c="+" Then sum1 = Val(Mid(s,j-1, 1)) + sum

                      If c="-" Then sum1 = Val(Mid(s,j- 1, 1)) - sum

                      sum=sum1

                      j=j- 1

                  Loop

                  If k=1 Then

                      sum2 = sum2 + sum

                  Else

                      c= Mid(s, k, 1)

                      If c =“+" Then sum2 = sum2 + sum

                      If c="" Then sum2 = sum2 - sum

                  End If

                  k=

              End If

              sum=0

          Next i

          Label2.Caption = sum2

      End Sub

    3. (3) 加框处的代码有错误,请改正。
  • 16. 小杨同学编写了一个vb程序用于学校里7选3选课情况统计。该程序主要功能有: 1.点击“生成选课组合”按钮Command1,生成35种选课组合:2.点击“统计选课情况"按钮Command2,统计出各种组合的选课人数:运行界面如下图。实现上述功能的VB程序如下,请回答下列问题:

    1. (1) 分析程序代码,图里“选课组合”序号为30的组合名称为:
    2. (2) 请在划线处填入合适的代码。请回答下列问题:

      Dim zh(1 To 16) As String,zrs As Integer

      Dim xk(1 To 1000) As String    '存放同学的选课科目组合,已知学生人数少于1000人

      Dim zh2(1 To 35) As String     '存放35种选课科目组合

      Dim rstj(1 To 35) As Integer     '存放各种选课组合选课人数

      Private Sub Form_ Load( )

          '本过程从数据库中读取学生的选课情况数据,存放在数组xk中,学生的总人数存放在变量zrs。

          '代码略

      End Sub

      Private Sub Command1_ Click()

          Dim iAs Integer, j As Integer, m As Integer, n As Integer, k As Integer

          Dim km(1 To 7) As String

          List1.Clear

          List1.AddItem "序号"+ "" + "组合名称"

          km(1) = "物": km(2) = "化": km(3)= "生": km(4)= "政"

          km(5) = "史": km(6) = "地": km(7)= "技"

          m= 1

          For i= 1 To 5

              For k=i+ 1 To 6

                  zh(m) = km(i) + km(k)

                  m=m+1

              Next k

          Next i

          j=3:n= 1:y=j

          For i= 1 To m

              For k=y To 7

                  zh2(n)=

                  If n<= 9 Then

                      List1.AddItemn&""&" " & zh2(n)

                  Else

                      List1.AddItemn&" " & zh2(n)

                  End If

                  n=n+ 1

              Next k

              y=y+ 1

              If y= 8 Then

                  j= : y=j

              End If

          Next i

      End Sub

      Private Sub Command2_ Click()

          Dim i As Integer

          List2.Clear

          List2.Addltem "组合名称" +""+ "选课人数”

          For i= 1 To 35

              rstj(i)=

              List2.AddItem zh2(i) +"" + Str(rsij(0)

          Next i

      End Sub

      Function tj(zhme As String) As Integer      '统计某种选课组合的选课人数

          Dim i As Integer, rs As Integer

          rs= 0

          For i= 1 To zrs

              If zhmc = xk(i) Then

                  rs=rs+ 1

              End If

          Next i

          tj=rs

      End Function

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

试卷信息