浙江省普通高中2022届高三上学期信息技术12月统测试卷

下列关于信息和信息技术说法正确的是(     )

下列有关网页与浏览器的说法，正确的是(      )

使用Access软件创建的“学校信息”数据表，其设计视图的部分学校信息界面如图所示，下列说法正确的是(    )

如图，下列关于计算机字符编码的描述，正确的是(      )

用Photoshop软件制作“致敬抗疫英雄海报”作品，如图所示。

下列说法正确的是(     )

一个时长为10秒、24位真彩色、总帧数300帧的未经压缩的AVI格式无声视频文件约为675MB，则其分辨率可能是(      )

VB表达式3^2*6Mod24\2*3的值是(      )

某算法部分流程图如图所示，执行这部分流程后，输出s的值是(    )

有如下VB程序段：

s ="ATCGCGCTACTGA"

s1 =" ACGT"

n= Len(s)

i=1：j=1：c=0

Do While i <= n and j <=4

    If Mid(s， i， 1)=Mid(s1， j，1) Then

        j=j+1

    End If

    i=i+1

Loop

s= Mid(s， 1， i-1)

执行该程序段后，变量s的值是(    )

有如下VB程序段：

i=1：j=10：n=0

Do While i<=j

    m=(i+j)\2

    If a(m)<key Then

        i=m+1

        n=n+ m

    Else

        j=m-1

        n=n-m

    End If

Loop

数组元素a(1)至a(10)中的值依次为“32，39，44，49，51，54，61，61，68，76”，当key值为61时，执行该程序段后，变量n的值是(     )

有如下VB程序段：

Dim a(1 To 6) As Integer

For i=1 To 6

    a(i)= Int(Rnd * 4)+1

    If a(i) Mod 2=0 And i Mod 2=0 Then

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

    End If

    s=s+Str(a(i))

Next i

执行该程序段后，变量s的值可能是(    )

数组a中各元素在列表框List1中以“个数逐行递增”的形式分布如图所示，在文本框Text11中输人行号，单击“排序”按钮，对该行数据做排序处理，并将排序之后的数据显示在文本框Text2。VB程序段如下：

Dim a(1 To 15) As Integer

'生成数组a， a(1)=24：a(2)= 17：a(3)=21：

a(4)=15：a(5)=14    …代码略

n= Val(Text1. Text)

For i=1 To n-1

    For j=(n+1) * n/2 To  ①  Step-1

        If  ②  Then

            t=a(j)：a(j)=a(j- 1)：a(j- 1)=t

        End If

    Next j

Next i

'将处理后的数组，以金字塔形显示，代码略

上述程序段中①②处的语句分别为(    )

小陈从网上收集的关于部分国家的疫情数据情况，并使用Excel软件进行数据处理，如图a所示，请回答下列问题：

图a

用Flash软件创作“川剧变脸”多媒体作品，部分编辑界面如图所示。

请回答下列问题：

某车管所计划设计-款选车牌的程序，规则如下：

规则一：随机选取10个车牌号，其中2个车牌的尾数是字母，其余8个车牌的尾数是数字。

规则二：车牌尾数按从小到大排列。

规则三：若规则一随机选取的车牌中，第1个车牌尾数为数字，则经过规则二排列后，还需要将字母尾数车牌进行穿插，最终形成：数字一字母一数字一字母一数字一数字……；若规则一随机选取的车牌中，第1个车牌尾数为字母，则经过规则二排列后，还需要将字母尾数车牌进行穿插，最终形成：字母一数字一字母一数字一数字……

程序运行后，列表框List1中显示随机选取的车牌，单击“排序”按钮，在列表框List2 中显示按以上规则排序后的待选车牌。

小明接受了一个任务：要对照赋分表完成对本次高三技术摸底考试的卷面成绩赋分，赋分表数据如下：

赋分成绩	100	99	98	97	96	……	42	43	41
卷面成绩	90	88	86	85	83	……	30	30	30

赋分成绩最低40分，卷面成绩低于30分则赋0分。赋分表数据存人数组ffb，如ffb(100)=90，则表示卷面成绩90时，赋分100分。小明设计的赋分具体步骤如下：

第一步：对学生的卷面成绩进行降序排序；

第二步：对照赋分表，对每-名学生卷面成绩进行赋分。

小明编写了VB赋分程序，在列表框List1中显示学号和学生卷面成绩，在列表框List2中显示赋分表数据，单击按钮“我要赋分”后，按照之前的学号顺序在列表框List3中显示学号、卷面成绩和赋分成绩。VB程序界面如下：

Const m = 10000

Dim xh(1 to 10000) As String     '存储学生学号

Dim cj(1 To 10000) As Integer     '存储学生卷面成绩

Dim ffcj(1 To 10000) As Integer    '存储学生赋分成绩

Dim ffb(40 To 100) As Integer     '存储赋分表数据

Private Sub Form_ Load()

    '读入m名学生的学号、技术考试卷面成绩分别存人数组xh和cj中，并在List1中显示；读入赋分表成绩存人数组ffb中，代码略

End Sub

Private Sub Command1_ Click()

    Dim a(0 To 100) As Integer

    Dim b(0 To 100) As Integer

    Dim c(1 To 10000) As Integer

    List2.AddItem "赋分成绩卷面成绩"

    For i=100 To 40 Step-1     '在List2显示赋分表数据

        List2. AddItem Str(i)+ "" +Str( ffb(i))

    Next i

    For i=1 To m    '统计各分数段的人数

            ①   

        a(t)=a(t)+1

    Next i

    j= 100

    Do While a(j)=0

        j=j-1

    Loop

    b(j)=1

    For k=j- 1 To 0 Step -1

        b(k)=b(k+1) + a(k+ 1)

    Next k

    For i=1 To m

        t=cj(i)

        c(b(t))=i

            ②   

    Next i

    p=1：q= 100

    Do While p<=m

        If cj(c(p))> = ffb(q) Then

                ③   

            p=p+1

        ElseIf q=40 Then

            ffcj(c(p))=0

            p=p+1

        Else

            q=q-1

        End If

    Loop

    List3. AddItem "学号卷面成绩赋分成绩"

    For i=1 To m

        List3. AddItem xh(i)+" " + Str(cj(i)) + ""+Str(ffcj(i))

    Next i

End Sub