高中信息技术：

高中信息技术

下列VB程序运行时，单击命令按钮Command1后，若在文本框中输入10，则标签Label1显示的内容是

Private Sub Command1_Click()

Dim sjzs As Integer

Dim rjzs As String

sjzs = Val(Text1.Text)

rjzs = ""

Do While Int(sjzs / 2) > 0

rjzs = Str(sjzs Mod 2) + rjzs

sjzs = Int(sjzs / 2)

Loop

Label1.Caption = rjzs

End Sub

在计算机中，原码和补码是两种常见的数字表示方法。原码表示法是在数值前面增加一位符号位（即最高位为符号位）：正数该位为0，负数该位为1，其余位表示数值的大小。在补码表示法中，正整数的补码与原码相同，负整数的补码是将其原码除符号位外的所有位取反（0变1，1变0，符号位为1不变）后加1。

若用一个字节表示十进制数-123，结果是

某旅行团需在酒店预订一批房间，要求所预订的房间号码尽量集中，如果有多种方案，优先选择预订房间数目较少的方案，有多组可选方案时选择起始房间号最小的方案。酒店有单人间和双人间两种房间，b 数组按房间号顺序存储该房间可入住人数，其中可入住人数为0 时，表示该房间已有人入住，不可预订。比如有16 个房间可入住人数如下：

房号	i	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16
人数	b(i)	2	0	2	2	0	1	2	1	2	1	0	2	1	0	2	2

下表给出了选择预订房间的过程（区间长度表示预订房间的起始房号到最后一个房号包含的房间数，区间长度值越小，代表预订房间分布越集中），选择最优方案过程如1）2）3）所示

1）从房间号码分布区间长度值最小原则，选择方案2、4、9

2）分布区间长度值相同时，选择预订房间数目最小的，因此选择方案2、9

3）所有可选方案中，优先选择最先成立的（起始房号最小的）方案，最终选择方案2

程序运行界面如下，请完成相应的小题

（1）如下图所示16个房间，当入住人数为5人时，预订房间号是：
（2）请在划线处填写适当的代码
Const n = 16     '假设酒店总房间数为16

Dim b(1 To n) As Integer      'b数组按房间号顺序存储各房间可入住人数

Function find1(x, y) As Integer

    '函数find1(x,y)的作用是从b(x)到b(y)中找到值为1的数组变量的下标，若找不到，返回值为0

End Function

Private Sub Command1_Click( )

    Dim s As Integer d As Integer, f as integer, num As Integer, roomnum As Integer

    Dim minnum as integer     'minnum 变量存储当前最优方案中的预订房间数目

    Dim mindist As Integer      'mindist 存储当前的最小分布区间长度

    '所有房间的可入住人数按房间号码顺序存储到数组b 中并显示在list1 中,代码略

    num = Val(Text1.Text)

    minnum = n: mindist = n :s = 0 : start = 0: f = 0: pos = 0

    For i = 1 To n

        If b(i) <> 0 Then

            j = i: s = 0: roomnum = 0

            Do While s < num And j <= n

                s = s + b(j)

                If b(j) > 0 Then roomnum = roomnum + 1

                j = j + 1

            Loop

            d =

            If s = num Then

                If d < mindist Or Then

                    start = i: mindist = d: minnum = roomnum: pos = 0

                End If

                ElseIf s > num Then    '若可入住人数超出，在当前区间内所选房间中取消1个单人间

                f = find1(i + 1, j - 2)

                If f > 0 Then

                    If d < mindist Or d = mindist And roomnum-1 < minnum Then

                        start = i: mindist = d: minnum = roomnum - 1: pos = f

                    End If

                End If

            End If

        End If

    Next i

    If start = 0 Then

        Label2.Caption = "房间数量不足"

    Else

        List2.AddItem "预订房间：" + Str(minnum) + "间"

        For i = start To

            If b(i) > 0 And i <> pos Then

                List2.AddItem "房间号:" + Str(i) + ",入住人数：" + Str(b(i))

            End If

        Next i

    End If

End Sub

下列选项中，不属于网络信息发布的是（）

A . 在黑板上张贴通知 B . 在网站上发布信息 C . 在QQ群上发公告 D . 在论坛上发帖寻求帮助

在Phoenix-Award的BIOS报警声中，下列哪一项表示系统启动正常（）

A . 1短 B . 1短1短1短 C . 不停地响 D . 2短1短1短

在使用数据库时，最常用的操作就是将所有符合条件的记录检索出来，这称为（）

A . 查找 B . 查询 C . 搜索 D . 排序

四川雅安地震发生后，某公司各部门员工积极捐款，公司决定对捐款最多的部门进行表扬。现有一张含有员工姓名、部门、捐款额等信息的Excel工作表，能快速得到捐款最多的部门的方法是( )

A . 按捐款额排序 B . 按部门+捐款额排序 C . 自动筛选 D . 按部门分类汇总捐款额

某区域是由A1、A2、A3、B1、B2、B3这6个单元格组成，不能使用的区域标识是（）

A . A1：B3 B . A3：B1 C . B3：A1 D . A1：B1

下面的代码段可以实现统计某种递增序列的功能：

a=[3,7,2,5,8,9,4,6,1]

m, c=1, 1

for i in range(1,len(a)):

if a[i]>=a[i-1]:

c+=1

m=max(m, c)

else:

c=1

程序执行后，c和m的值分别是( )

A . 1和1 B . 1和4 C . 2和4 D . 3和4

在编程解决“韩信点兵”问题时，写出韩信点兵问题的求解步骤属于（）

A . 分析问题 B . 设计算法 C . 编写程序 D . 设计运行

在网上不能随意下载的是( )。

A . 共享软件 B . 自由软件 C . 正版软件 D . 硬件驱动程序

计算机基本结构图如图所示，下列关于计算机硬件的描述，不正确的是( )

A . 运算器负责执行算术运算和逻辑运算 B . 控制器指挥协调其他部件有序工作 C . 存储器用于存放程序和数据 D . 计算机系统结构以输入、输出设备为中心

小李编写了一个VB 程序，功能如下：在文本框 Text1 中依次输入各个区间的起点和终点（数据均为小于100的正整数，都用逗号分隔并以逗号结尾），单击“查找”按钮 Command1后，在Label2上显示最短区间长度。例如，三个区间为(1,10),(15,23),(26,29)，输入格式及程序运行界面如图所示。

（1）要使窗体Form1标题显示“最短区间长度”，则需修改该窗体的（单选，填字母：A .Font/ B .Text/ C .Caption）属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()

  Dim s As String, ch As String

  Dim i As Integer, k As Integer

  Dim L As Integer, R As Integer

  Dim temp As Integer, min As Integer

  s = Text1.Text

  i = 1: k = 0: temp = 0: min = 100

  Do While i <= Len(s)

        ch = Mid(s, i, 1)

        If ch >= "0" And ch <= "9" Then

            temp =

        Else

            k = k + 1

            If   Then

                L = temp

            Else

                R = temp

                If R - L + 1 < min Then min = R - L + 1

            End If

            temp = 0

        End If

        i = i + 1

  Loop

  Label2.Caption = "最短区间长度是" + Str(min)

End Sub
（3）运行程序，若文本框Text1中输入内容的结束符缺失（即输入内容为1,10,15,23,26,29），单击“查找”按钮，标签Label2中显示的内容是。

某 VB 程序如下：

Dim a(1 To 6) As Integer

Randomize

a=n Mod k

n=n\k,k=k+1,s=s+a

a(1) = Int(11 * Rnd) + 2

For i = 2 To 6

a(i) = Int(11 * Rnd) + 2

If i Mod 2 = 1 And Not prime(a(i)) Then i = i - 1

ElseIf Not prime(a(i)) Then a(i) = a(i) + a(i - 1)

End If

Next i

'自定义函数 prime()用于判断参数是否为质数，prime(n) = True 则说明 n 为质数，否则为合数，定义函数代码略执行该程序后，a(1)～a(6)的值不．可．能．为（）

A . 7, 10, 3, 7, 11, 23 B . 4, 10, 5, 11, 3, 11 C . 6, 10, 7, 16, 7, 7 D . 12, 2, 11, 3, 3, 13

仔细观察下面的图表，完成下列填空。

图a

（1） “公共理论”科目的离差为考生的“公共理论”成绩与所有科目“公共理论平均分”的差值。E4单元格公式如图a所示，自动填充至E14，发现有误，则正确的公式应该为。
（2）为了在L4单元格中显示准考证为“00307001”考生的总成绩在“高中语文”中的名次，则L4单元格中的公式是，其他单元格用自动填充功能完成。
（RANK函数的含义：求某一个数值在某一区域内的排名。示例：语法格式=RANK(number，ref，[order])，number为参与排名的数值，ref为排名的数值区域，order为0是降序，1是升序，[order]省略，默认为降序。示例：=RANK(A1，A1：A3，1)，显示A1单元格中数据在单元格A1到A3数据区域中的升序名次）。
（3）由下图可知创建图表时选择的数据区域为。
（4）对“高中信息”按“总成绩”进行排序，应选择区域为。
（5）对“高中信息”先按“总成绩”降序排序，若“总成绩”相同，按“专业知识”的成绩降序排序，则排序完成后“高中信息”中第二位的“准考证”是。
（6） D15的值是通过AVERAGE函数计算得到，若不慎将D8单元格数据误删，导致此单元格无数据，则D15单元格中数值将。（单选，填字母：A .变大；B .变小；C .不变）

以下语句的运行结果是（）

pwd= {" Name" : "User"， "Password" :"@YueKao108"}

pwd["Name* ]=" Administrator"

print（pwd["Name"][:4]）

A . "User" B . "resU" C . "Admi" D . "Admin"

使用UltraEdit软件观察字符“字母a～z”内码，部分界面如图所示.

下列说法正确的是（）

A . 图中共有3个ASCII码字符 B . 字符“j”的十六进制编码值为70 C . 字符“z”内码值的十进制表示为122 D . 字符“母”内码值的二进制表示为“1100010010101000”

下列关于数据整理的说法错误的是（）

A . 数据整理的目的是对数据进行校验和标准化 B . CSV文件将数据表格存储为纯文本 C . 采集的数据只能保存为CSV文件 D . 整理数据可以通过编写程序实现

下列表达式中，值为True的是（）

A . 1>=2 or 3<5 and 7//2>6//2 B . not(1>2 or 1!=5) C . int(6.89)==7 D . 8%5==9//3

小明通过网络问卷收集到“双减”背景下学生阅读时长的数据，准备用图表呈现不同时长占比分布的情况，下列图表类型中最适合的是（）。

A . 折线图 B . 饼图 C . 动态热力图 D . 柱形图

高中信息技术：

高中 信息技术

高中信息技术