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

2020年浙江省金华十校高考信息技术模拟试卷(4月份)

发布:2024/4/20 14:35:0

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

  • 1.下列关于信息和信息技术的说法,不正确的是(  )

    组卷:2引用:1难度:0.5
  • 2.下列关于网络和网页的相关说法,正确的是(  )

    组卷:1引用:3难度:0.6
  • 3.小明用Word 软件编辑了一篇科学小论文并发给老师修改,下列描述正确的是(  )

    组卷:0引用:1难度:0.5
  • 4.某员工管理系统使用 Access建数据表,部分界面如图所示。下列说法不正确的是(  )

    组卷:1引用:1难度:0.6
  • 5.使用GoldWave软件处理音频文件,选中其中一段音频后的部分界面如图所示:

    下列说法正确的是(  )

    组卷:0引用:1难度:0.5

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

  • 15.医疗物资打包。抗疫志愿队接到一项任务要将N份医疗物资打包成1个大包裹,每份物资的重量为D(1)、D(2)、…、D(n)。由于设备原因,每次只能将2个包裹分装成1份。由于每次打包都需要移动物资,需要消耗体力。消耗的体力值为打包的医疗物资的重量之和。
    例如将9、9、6的三份物资打包时,先将9和6的两份打包,消耗体力15,再将15和9两个包裹打包为1个消耗体力24,于是总的体力消耗值为39
    经过志愿队众人分析,每次将现存包裹中最轻的两个合并,消耗的总体力会最小。
    小风同学根据这一算法策略,编写VB程序用于计算n份包裹分装需要的最少体力值
    (1)要使得程序的标题栏中显示”医疗物资打包,可修改窗体的
     
    属性(单选,填字母:A.Text/B.Form/C.Caption).
    (2)实现上述功能的VB程序如下,请在横线处填入合适的代码。
     

     

     

    (3)程序中加框处代码有错,请改正。
     

    Dim(1 To 100)As Integer
    Dim n As Integer
    Private Sub Form_Load ____
    ’读入n的值和n个包裹的重量依次存入d(1).d(n)
    End Sub
    Private Sub Command1 _Click ____
    For i=1 To n
    Call px(i)
    Next i
    ans=0
    Do While①
     

    d(n-1)=d(n)+d(n-1)
    n=n-1
    ans-ans+d(n)+d (n-1 )
     

    Loop
    Text1.text=ans
    End Sub
    Sub px(ByVal n As Integer)
    For i=n To 2 Step-1
    If ③
     
     Then
    tmp=d(i):d(i)=d(i-1):d(i-1)=tmp
    End If
    Next i
    End Sub

    组卷:1引用:1难度:0.3
  • 16.积分循环赛是棋类比赛中经常使用的赛制之一它能有效地避免种子选手一开始就交锋、拼掉。若有n(n一定为偶数)支队伍进行r轮比赛采用积分循环赛,则比赛规则如下:
    ①第一轮比赛前,先给各队伍随机排名,设定队伍编号:排名i的编号为i
    ②第一轮比赛:第1名和第2名、第3名和第4名、…、第n-1名和第n名,各进行一场比赛。每场比赛胜者得1分,负者得0分(已知所有队伍的实力值不同,且实力值高的队伍一定可以打败实力值低的队伍)
    ③根据比赛得到的分数,按照分数从高到低排名,若分数相同则编号小的队伍排在前面。
    ④接下去的r-1轮比赛均采用②的规则进行比赛,且每比完一场比赛都按照③的规则对队伍顺序排名,排名的结果是下一轮比赛队伍的顺序。
    程序界面如下图。

    (1)若有4支编号依次为“1,2,3,4”队伍进行2轮比赛,且各支队伍实力值依次为“12,9,16,15”,则2轮比赛后队伍“1,2,3,4”的分数依次是
     
    。(分数用逗号隔开)
    (2)请在横线处完成代码填空。
    Dim a(1 To 100)Integer,b(1 To 100)As Integer
    Dim num(1 To 100)As Integer,win(1 To 100)As Integer,lose(1 To 100)As Integer
    Dim win_num As Integer,lose_num As Integer
    Dim As Integer,r As Integer,s1 As String,As String,53 As String
    Private Sub Command1_Click ____
    读取已打乱的队伍信息,编号、实力分别存在数组num和数组a中,且将数组b置0
    代码略
    End Sub
    Private Sub Command2_Click ____
    Dim i As Integer,j As Integer,t As Integer
    ori=1 To Step2  先比第一轮
    If a(i)>a(+1)Then b(i)=1 Else ____
    Next i
    For i=1Ton-1   将第一轮结果排序
    For j=1 Ton-i
    If cmp(
     
    ) Then
    t=num(j):num(j)=num(j+1):num(j+1)=t End If
    Next j
    Next i
    For i=1 To r-1'比剩下的 r-1 轮比赛
    win_num=0:lose_num=0
    For j=1 To n Step 2
    win_num=win_num+1:lose_num=lose_num+1
    If a(num(j))>a(num(j+1)) Then
    b(num(j))=b(num(j))+1
    win(win_num)=num(j):lose(lose_num)=num(j+1)
    Else
    b(num(j+1))=b(num(j+1))+1
    win(win_num)=num(j+1):lose(lose_num)=num(j)
    End If
    Next j
    Call merge'调用过程,合并胜利组和失败组Next i
    s1=“编号:“:s2=“分数:“
    For i=1 To n
    s1=s1+format(num(i))
    s2=s2+format(
     

    Next i
    List2.AddItem s1 List2.AddItem s2
    End Sub
    Sub merge
     
    '合并过程
    '将胜利组与失败组按照分数合并,生成下一轮比赛顺序并存回数组 num 中
    '代码略End Sub
    Function format(x As Integer) As String'格式化字符串函数'将输入数字格式化为 3 个字符长度,代码略
    End Function
    Function cmp(i As Integer,j As Integer) As Boolean'比较函数cmp=False
    If b(i)=b(j) Then
    If i<j Then cmp=True
    ElseIf b(i)>b(j) Then  cmp=True
    End If
    End Function

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