高中信息技术：

高中信息技术

根据下图所示，F11单元格的计算公式可能是( )

A . =AVERAGE(F3:F10) B . =AVERAGE(F3:F9) C . =SUM(F3:F10) D . =SUM(F3:F9)

一个完整的计算机系统可以分为（）

A . 软件系统和硬件系统 B . 硬件系统和操作系统 C . 操作系统和应用系统 D . 网络系统和操作系统

小王收集了2018年、2019年、2020年内地电影票房排行数据，并使用Excel软件进行数据处理，如图a所示。

请回答下列问题：

（1）如图a所示，区域A10：A18通过RANK函数计算得到2019年总票房的年度排名，在A10单元格输入公式后，用自动填充功能完成A11：A18的计算，则A10单元格的公式是。
(提示：RANK函数返回某数字在一串数值中的相对其他数值的大小排名。例如：=RANK(D3，D3：D9)表示D3中的数值在D3：D9区域中所有数值中的大小排名)
（2）根据图a中数据制作的图表如图b所示，创建该图表的数据区域是，C17，D17，C19，D19。
（3）如果给2020年的电影按“总票房(亿)”进行从高到低排序，应选择的数据区域为，排序完成后，图b所示的图表是否会发生改变(选填：会/不会)。

下列关于VB对象的描述中，不正确的是（）

A . 一个对象的状态是通过若干个属性来描述的 B . 每个对象都有自己的行为，即对属性进行操作和处理的方法 C . 对象事件的发生会驱动该对象相应事件处理过程的执行 D . 不同对象的属性与方法一定不相同

看程序写结果：

请问右边的程序段运行结束后，

变量x的值为

变量y的值为

竹简是我国西周至魏晋时期主要的书写工具，古人把文字刻在竹简上，所体现的信息特征是( )

A . 价值性 B . 载体依附性 C . 时效性 D . 共享性

【加试题】n堆金币，把两堆金币合并到一起，n堆金币经过n-1次合并之后就只剩下一堆了。如何消耗最少的体力，把这n堆金币合并成一堆？合并所消耗的体力等于每次合并两堆金币的重量之和。比如，n=3时表示共有3堆金币，每堆重量分别是2、1、9.一种合并方案是2和9合并，新堆重量是11，消耗体力为11；接着11和1合并，新堆重量是12，消耗体力为12，因此总消耗体力是11+12=23。另一种方案是：1和2合并，新堆重量是3，消耗体力为3；接着3和9合并，新堆重量是12，消耗体力为12，因此总消耗体力是3+12=15。可以证明这就是最少消耗体力。

小张经分析，每次n堆金币如果都是从小到大，将前两堆合并成新一堆，然后，继续进行从小到大排序，如此合并成最后一堆，此时消耗体力最少，为此他编写了一个解决上述问题，求最少体力的VB程序，功能如下：窗体加载时，自动读取n堆金币的数据，依次存储在数组元素a(1)、a(2)、a(3)…中，金币堆数存储在变量n中，n堆金币的重量数据显示在列表框List1中。单击“求解”按钮Command1，程序对n堆金币进行合并处理，消耗最少的体力显示在文本框Text1中。程序运行界面如图所示。

（1）如果有5堆金币，每堆重量分别是12、8、5、9、15，则将这5堆金币合并成一堆金币，最少消耗体力是。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n = 10

Dim i As Integer, j As Integer, t As Integer

Dim a(1 To n) As Integer

Private Sub Form_Load()

'本过程用于读取n堆的数据并存储在数据a中

'代码略

End Sub

'sort(x)过程的功能是对a(x)、a(x+1)、……、a(n)中的数进行从小到大排序

Private Sub sort(x As Integer)

For i =To n - 1

For j = n To i + 1 Step -1

If a(j) < a(j - 1) Then

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

End If

Next j

Next i

End Sub

Private Sub Command1_Click()

Dim sum As Integer, k As Integer

sum = 0

sort (1)

For k = 1 To n - 1

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

sum = sum +

sort ()

Next k

Text1.Text = Str(sum)

End Sub

【加试题】某数据存储算法如下：使用长度为n的一维数组h来存储m个不同整数型数据(m<n)，数据的存储位置t根据存储数据的值除n取余计算得到。例如使用长度为11的数组来存储67，45，1 275，119，145，269，64共7个数据，先存储第1个数据67，67 Mod 11=1，在第1位置上没有数据，则存放在第1位置。第2个数据45，45 Mod 11=1，而在第1位置上已存有数据，那么查找下一位置有没有数据，现第2位置上没有数据，则存放在第2位置。在查找空位时如果到了数组最后一个位置还没有空位，则从头继续查找，以此类推……，举例数据存储结果如表所示。

位置	0	1	2	3	4	5	6	7	8	9	10
数据	64	67	45	145		269				119	1275

（1）若按上述规则，再存储一个数据79，则存储在第位置。
（2）当n=97时，实现上述数据存储及相应数据查找的VB程序如下，运行结果如图所示，请在画线处填入合适的代码。
Const n=97

Dim d(0 To 96)As Integer，h(0 To 96)As Integer

Dim m As Integer     ‘变量m为数据个数

Private Sub Command1_Click()    ‘数据存储

    Dim i As Integer，t As Integer

    ‘从数据库读取数据先存储在数组d中，代码略

    List1.Clear

    For i=0 To n-1

         h(i)=-1    ‘数组元素初始化

    Next i

   For i=0 To m

  ①

        Do While h(t)<>-1

             t=(t+1)Mod l2

        Loop

        h(t)=d(i)

Next i

For i=0 To n-1

    List1．AddItem Str(i)＆“：”&Str(h(i))

Next i

End Sub

Private Sub Command2_Click()    ‘数据查找

    Dim x As Integer，Y As Integer，z As Integer

    x=Val(Text1．Text)

    y=x Mod n

    z=1

    Do While   ②

        z=z+1

        y=(y+1)Mod n

    Loop

    If h(y)=x Then

        Label2．Caption=“共查找了”&Str(z)&“次，在第”&，Str(y)&“位置找到”

    Else

        Label2．Caption=“共查找了”&Str(z)＆“次，没有找到”

    End If

End Sub

① ②
（3）数组h中的元素值初始化为-1表示含义是。

模拟信号是指用（）变化的物理量所表达的信息。

A . 频率 B . 幅度 C . 离散 D . 连续

下列合法的变量名是（）

A . if B . i C . *c D . True

小张使用Word软件编辑某文档,部分界面如图所示｡

下列说法正确的是 ( )

A . 图中图片的环绕方式一定不是“ 嵌入型” B . 在光标所在处按“ Delete” 键,可以删除“ 曹娥江与甬江” 下方的波浪线 C . 接受所有修订后,图中文字变为“ 天台山( tiān tāi shān) 位于中国浙江省天台县城北” D . 可使用查找替换功能将文档中的所有的“ 天台山” 一次性加粗显示,这采用了人工智能技术

下列叙述中不正确的是：（）

A . 微电子技术是现代信息技术的基石 B . 信息是一成不变的东西 C . 信息是一种可利用的资源，具有一定的使用价值 D . 信息可以在时间和空间上传递

（）可以为图层内容进行图案填充。

A . 投影样式 B . 斜面和浮雕样式 C . 描边样式 D . 图案叠加样式

编写VB程序，界面设计如图所示，使其具有下列功能：在文本框Text1中输入一个小于20的正整数n，单击“计算”按钮Command1，计算斐波那契数列中第n项的值，并在标签Label2中输出结果；若输入错误，则在标签Label2中显示相应的提示信息。(斐波那契数列是指这样的数列：1,1,2,3,5,8,13…。即：第1项和第2项的值均为1，从第3项开始，每一项的值是它前面两项之和)

（1）代码“Private Sub Command1_Click()”中的Command1 是(单选，填字母：A .对象名/B .属性名/C .属性值/D .事件名)。
（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()

Dim n As Long,k As Integer

Dim f1 As Long,f2 As Long,f As Long

If n>=20 Or n<=0 Then

Label2.Caption=”输入的数据有误”

Else

If n<=2 Then ‘第1，2个元素的值都为1

f=1

Else

f1=1

f2=1

For k=3 To n

f=f1+f2

f1=f2

f2=f

Next k

End If

Label2.Caption = ”斐波那契数列第” + Str(n) + ”项的值为” +

End If

End Sub
（3）若在文本框Text1.Text输入21，则标签Label2显示的内容为。

某Python程序代码如下：

s='t1Hr2a3'

s1='' ; s2=''; i = 0

while i < len(s):

if '0'<=s[i]<='9':

s1 = s1 + s[i]

elif 'a'<=s[i]<='z':

s2 = s[i] + s2

i = i + 1

ans = s2 + s1

print(ans)

程序执行后，输出的结果是( )

A . 12art3 B . art123 C . rta123 D . art321

小丁想买几张6+1彩票，选号时，他希望前4位用自己的生日：11月8日，即1108，特别号码他选了买彩票日子的个位数5，并且他希望前六个数字组成的数能被他的幸运数字9整除。他的好朋友小杰帮他设计了一个VB程序，可以提供一份符合这些要求的号码清单供他挑选。相应的界面如图1所示。阅读程序并完成后面的问题。

图1

（1）设计应用程序界面时，为添加a所指向的对象，应使用图2所示的“控件工具箱”中的（填写相应编号）;在图3所示的“属性窗口”中，将属性值设置为“开始”，可使图2中b所指向的对象显示“开始”。
（2）请根据题意将下列程序补充完整。
Private Sub Command1_Click()
Dim i, j, c As Integer
Dim n As Long
c = 0
For i = 0 To 99
      n = 110800 + i
              If Then
      List1.AddItem Str(n) + " " + "5"
      c = c + 1
     End If
Next i
Label2.Caption = "满足条件的数有：" + Str(c) + "组"
End Sub

多媒体作品中必须要有文字、动画和声音信息。

某算法部分流程图如图所示，下列说法不正确的是（）

图片_x0020_100003

A . 该流程图转换成VB代码时可以用Do循环实现 B . 程序执行完后 f 的值等于f2的值 C . 语句f<=20 共执行了6次 D . 最后输出f1和f2的值分别是13，21

有如下VB程序段：

s=0

For k =3 To 1 Step-1

If k <=1 Then x=1

If k <=2 Then x=2

If k <=3 Then x=3

s=s+x

Next k

Text1. Text= Str(s)

该程序段运行后，文本框Text1中显示的内容是（）

A . 9 B . 7 C . 6 D . 5

电子不停车收费系统(ETC)通过安装在车辆挡风玻璃上的车载电子标签与在收费站ETC车道上的微波天线之间进行的专用短程通信，利用计算机联网技术与银行进行后台结算处理，从而达到车辆通过高速公路或桥梁收费站无须停车而能交纳费用的目的，如图1-4所示。根据交通运输部统一部署，将出台取消高速公路省界收费站的具体实施方案，利用ETC系统替代人工收费，进一步提高车辆通行效率，降低物流成本。

阅读以上材料，完成以下题目：

（1） ETC的电子标签卡存储有车型车号等信息，当持卡车辆进人不停车收费车道时，车辆感应器产生来车信号，激发射频自动识别读取电子标签卡上的信息。该电子标签卡属于信息系统中的( )

A . 用户 B . 软件 C . 数据 D . 硬件
（2）关于ETC，下列说法不正确的是( )

A . 车主使用ETC通过高速收费站，避免了停车付钱找零等过程，提高了效率 B . ETC可以在所有支持ETC收费的高速出口使用，说明充值的金额都存储在记账付费卡中 C . 新闻报道有不法分子使用POS机盗刷ETC付费卡中金额，说明信息系统本身有安全隐患 D . 车载电子标签的太阳能电板失效导致无法通过收费站，说明信息系统对外部环境有依赖性
（3）为积极推进取消高速公路省界收费站的政策方案，交通运输部除了印发相关通知公告，还在各大网络平台及时公布相关政策细节与实施举措。其中未体现的在线政府特征是( )

A . 科学决策 B . 公开透明 C . 高效治理 D . 互动参与

高中信息技术：

高中 信息技术

高中信息技术