山东省滨州市滨城区信息技术开学模拟考试卷（四）
试卷更新日期：2023-09-28 类型：开学考试
一、选择题
-
1. 要交换两个整数型变量x和y的值，解决这个问题的算法是（ ）
①x=y ②y=x ③t=x ④x=t ⑤y=t ⑥t=y
A、①② B、④⑥② C、②⑥④ D、③①⑤2. 在Excel中，使用折线图可以（ ）。A、表示不同项目数据之间的比较 B、比较各部分在总体中所占的比例 C、了解事物随时间变化的趋势 D、显示相对于中心点的数值变化3. 关于对数据的排序，以下说法中正确的有（ ）A、在Word中可以插入表格，Word提供了对表格中数据进行排序的功能 B、在PowerPoint中也可以插入表格，并且也提供了对表格中数据进行排序的功能 C、利用Excel软件可以很方便地进行排序，并且Excel中还提供了自定义排序的功能 D、用编程来解决排序问题也是一种常用的方法4. 某VB程序段如下：i= 1：j= 6：key=8
Do While i<= j
m=(i+j)\2
If a(m)<key Then
j=m- 1
Else
i=m+ 1
End If
Loop
数组元素a(1)到a(6)的值依次为“9，8，8，8，7，6”，运行该程序段后，下列说法正确的是( )
A、可以找到数值8开始出现的位置，该位置信息由变量i指示 B、可以找到数值8最后出现的位置，该位置信息由变量i指示 C、可以找到数值8开始出现的位置，该位置信息由变量j指示 D、可以找到数值8最后出现的位置，该位置信息由变量j指示5. 在excel单元格中输入：=Average(10,-3)-Max(10,-3)，则该单元格显示的值（ ）A、大于零 B、小于零 C、等于零 D、不确定6. 查找某key值的VB程序段如下：n=0：i=1：j=6
Key = Val （Text1. Text）
Do While i<=j
m=(i+j）\2
If Key = a（m） Then Exit Do
If Key > a（m） Then
i=m+1：n=n*2
Else
j=m-1：n=n-1
End If
Loop
若数组元素a（1）到a(6)的值依次为4， 11， 19， 26， 38， 45。运行该程序段后，变量n的值为-4，则文本框Text1输入的数字可能是（ ）
A、3 B、18 C、40 D、327. 如图是何老师打开的高二（1）班段考成绩表，如果只想浏览数学成绩高于90分的学生名单，应该使用的操作是（ ）。
A、求和 B、求平均值 C、排序 D、筛选8. 某对分查找算法的VB程序段如下：flag=False
i=0: j=7: c=0
Do While<= j And flag=False
m=Fix((i+j)/2+0.5)
If Key=a(m) Then flag=True
If Key< a(m) Then j=m-1 Else i=m+1
c=c+1
Loop
数组元素a(0)到a(7)的值依次为“1，3，30，46，6S，72，84，90”，key的值为85。若该程序段执行后，以下说法中正确的是（ ）
A、i=6 B、j=7 C、m=7 D、c=49. 在搜狐网站中，按照“教育培训/高等教育/高等院校/大学/综合院校”的查找方式，找到“北京大学”等多所知名院校的相关链接。这种搜索方式属于（ ）A、元搜索 B、特色信息检索 C、目录索引搜索 D、全文搜索10. 有如下VB程序段：flag=False:s="ShanShui2020！"
For i=1 To Len（s）
ch=Mid（s，i，1）
If Not（ch〉="0"And ch<="9"）And Not flag Then
t=ch+t
End If
flag=Not flag
Next i
Text1.Text=t
执行完以上程序段后，文本框text1中的内容为（ ）
A、!uSaS B、SaSu! C、!22uSaS D、ShanShui!11. 关于获取信息的方法，下面说法正确的是（ ）A、利用网络获取信息是最好的方法 B、根据实际情况获取信息比较真实可信 C、电子邮件只能获取文字信息 D、通过信息交流无法获取有效信息12. 在下列电子表格中，( )可以实现只显示爱好篮球的学生信息。
A、排序 B、按班级排序 C、先按班级排序,再对班级进行分类汇总 D、自动筛选二、填空题
-
13. 小王设计了一个程序来列举仁川亚运会的奖牌前三的国家。下列VB程序实现如下功能：单击命令按钮Command1后，在列表框List1中按奖牌数由多到少显示国家名称，如图。
请根据算法将下列程序补充完整。
Dim a(1 To 45) As String
Dim b(1 To 45) As Integer
Private Sub Form_Load()
a(1) = "中国"
b(1) = 308
‘45个代表团名称及奖牌数分别放在a(1)到a(45)及b(1)到b(45)中
End Sub
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim t As Integer,f As Integer
List1.Clear
For i = 1 To 3
For j = To 2 Step -1
If Then
f = a(j): a(j) = a(j - 1): a(j - 1) = f
t = b(j): b(j) = b(j - 1): b(j - 1) = t
End If
Next j
Next i
For i = 1 To 3
List1.AddItem "第" + Str(i) + "名" + a(i) + " 奖牌数" + Str(b(i))
Next i
End Sub
14. 读流程图写结果
已知数组a中依次存放了6个数：-1，4，12，10，-3，8，运行结果是。
三、判断题
-
15. 在Excel 2003中，输入一个较长的数字后，若单元格中显示“######”，意味着列宽不够，不能正常显示该数字。（ ）16. 实现Excel工作表中一列的列宽调整方法是将鼠标移到该列列标右边界垂直线，拖动该边界左右移动，使列宽改变到适当大小，释放。( )17. WPS表格中无法实现稍微复杂的判断处理任务。( )
四、简答题
-
18. 企业系统如何帮助企业达到运营优秀19. 可以用什么方法选择、评估信息系统项目，并且使其和公司商业目标一致？20. 某省2014年主要统计数据表，放置于Excel工作簿“Sheet1”工作表中，如图1所示。
图1(1)、为了使表格的标题合并及居中放置，应先选择B2:E2单元格，然后在“单元格格式”对话框图中（如图2所示）做如下设置：。
图2(2)、去年总量的计算公式是：去年总量=总量/（1+增幅），要计算去年总量，则应先在E5单元格中输入公式 ， 然后在自动填充E6:E13单元格。(3)、在计算出去年总量后，先制作一张反映表格中数据的柱状图，再对表格数据按增幅进行降序排序，（如图3所示），先选中单元格 ， 然后选择“数据”菜单中的“排序”，在打开的排序对话框中设置主要关键字为“增幅”，进行降序排序。
图3(4)、完成排序后，请问对步骤（3）中生成的柱状图是否有影响？