试卷征集
加入会员
操作视频
当前位置: 试卷中心 > 试卷详情

2020年浙江省舟山中学高考信息技术仿真模拟试卷

发布:2024/11/24 13:30:2

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

  • 1.下列有关信息与信息技术的说法,正确的是(  )
    ①信息表达的规范化有利于信息的交流
    ②信息的表示、传播、存储不一定依附于某种载体
    ③多媒体信息必须数字化后,才能被计算机存储和处理
    ④信息的加工和管理必须使用计算机才能完成
    ⑤近代信息技术有摄影技术、微电子技术、广播和电视技术
    ⑥信息具有时效性,获取的信息应当立即发布
    ⑦信息具有共享性,可以在网盘中共享各类视频点播服务

    组卷:5引用:1难度:0.6
  • 2.下列关于网站与网页描述正确的是(  )

    组卷:5引用:1难度:0.6
  • 3.有一条数据“20210106,杨逸,False,2001/12/08”想分别复制到相应的字段中,有出错提示,可能原因是(  )

    组卷:4引用:1难度:0.6
  • 4.一幅大小为 1024*768,位深度为 24 位的 BMP 图片,把它另存为大小为 512*768 像素的黑白 256 级灰 度 BMP 图象,其存储容量约为原来的(  )

    组卷:1引用:1难度:0.6
  • 5.使用 GoldWave 软件打开某音频文件,选中一段音频后的部分界面如图所示。下面说法正确的是(  )

    组卷:1引用:2难度:0.2

二、非选择题(本大题共4小题,其中第1小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)

  • 15.现要编写一个程序,对每个班级的同学生成考试座位号,规则如下:先按成绩从高到低排序,如果成绩相同,学号在前的学生座位号在前,最后输出每个同学的座 位号。小王和小李采用不同的方法实现了上述算法。 请仔细比较两位同学的代码的不同之处,并完成相关代码的填空。
    Dim  xm(1  To n)  As  String,xh(1  To n)  As  String
    Dim  cj(1  to  n)As  Integer
    Private  Sub  form_load (  )
    ‘读取相关数据表,把姓名、学号、成绩分别存储到数组 xm、xh、cj 中,并在 List1 中显示,代码略 End  Sub
    Private  Sub  Com1_Click (  )′小王编写的代码部分
    Dim  wz(1  To  n)  As  Integer
    For  i=1 To  n-1 wz(i)=i
    For  j=n To  i+1 Step-1
    If (1)Then
    t=cj(j):cj(j)=cj(j-1):cj(j-1)=t t=xh(j):xh(j)=xh(j-1):xh(j-1)=t
    End  If
    Next  j
    Next  i
    (2)  For  i=1 To  n-1
    For  j=n To  i+1 Step-1
    If(3)Then
    t=cj(j):cj(j)=cj(j-1):cj(j-1)=t t=xh(j):xh(j)=xh(j-1):xh(j-1)=t t=wz(j):wz(j)=wz(j-1):wz(j-1)=t
    End  If
    Next  j
    Next  i
    List2.Clear
    List2.AddItem″学号  姓名  成绩  座位号″For  i=1 To  n
    List2.AddItem  xh(i)+″″+xm(i)+″″+Str(cj(i))+““+Str(wz(i))
    Next  i
    End  Sub
    Private  Sub  Com2_Click (  )′小李编写的代码部分
    Dim  wz(1  To  n)  As  Integer,t(1  To  n)  As  Integer
    For  i=1 To  n t(i)=i
    Next  i
    For  i=1 To  n
    For  j=n To  i+1 Step-1
    If(4)Then
    temp=t(j):t(j)=t(j-1):t(j-1)=temp
    End  If
    Next  j(5)Next  i
    List2.Clear
    List2.AddItem″学号  姓名  成绩  座位号″For  i=1 To  n
    List2.AddItem  xh(i)+″″+xm(i)+″″+Str(cj(i))+″″+Str(wz(i))
     Next  i
    End  Sub

    组卷:5引用:1难度:0.3
  • 16.小奕同学基于排序算法设计了一个数字矩阵排序的程序。程序界面如图所示,在文本框中输入矩阵大小,点击“生成”按钮 Command1,在左侧列表框  List1  中输出一个长宽均为指定大小的随机 整数矩阵,随机整数范围为【1,99】。点击“排序”按钮  Command2,结果输出在右侧列表框  List2  中,奇数行从左到右依次递增,偶数行从右至左依次递增,且保持输出矩阵的长宽不变。

    (1)实现上述功能的  VB  程序如下,显示数据用的additem  是一种
     
    (单选,填字母:A.属性名
    /B.事件名/C.方法名/D.过程名)。
     (2)请在横线处填入合适的代码。
    (3)程序中加框处代码有错,请改正。Dim  a(1  To  100)As  Integer
    Dim  n As  Integer
    Function  dq(s  As  String,L As  Integer)  As  String'自定义对齐函数
    Rem  在输入的字符串  s 前加若干空格,输出长度为  L 的字符串,代码略 End  Function
    PrivateSub Command1_Click (  )'生成数字矩阵
    ‘随机生成  n^2  个数字,存储在数组  a 中,代码略
    ‘以一行  n 个,共  n 行的格式显示在  List1  中,代码略
    End  Sub
    Private  Sub  Command2_Click (  )'数字矩阵排序
    Dim  i As  Integer,k As  Integer,j As  Integer,s As  String
    Dim  f As  Boolean
    List2.Clear f=True
    For  i=1 To  n^2 Step  n s=″″
    For  j=i To 
    k=n^2
    Do  While
    If a(k)<a(k-1)Then
    t=a(k):a(k)=a(k-1):a(k-1)=t
    End  If
    k=k-1
    Loop
    If f=True  Then
    s=s+″″+dq(Str(a(j)),2)Else
    s=″″+dq(Str(a(j)),2)+s
    End If Next  j List2.AddItem  s
      Next  i
    End  Sub

    组卷:0引用:1难度:0.5
深圳市菁优智慧教育股份有限公司
粤ICP备10006842号公网安备44030502001846号
©2010-2025 jyeoo.com 版权所有
APP开发者:深圳市菁优智慧教育股份有限公司| 应用名称:菁优网 | 应用版本:5.0.7 |隐私协议|第三方SDK|用户服务条款
广播电视节目制作经营许可证|出版物经营许可证|网站地图
本网部分资源来源于会员上传,除本网组织的资源外,版权归原作者所有,如有侵犯版权,请立刻和本网联系并提供证据,本网将在三个工作日内改正