4.1搭建信息系统的前期准备 同步练习2021-2022学年浙教版（2019）必修二信息系统与社会

4.1搭建信息系统的前期准备同步练习
一、选择题（共18题）
1．在网上购物，除了比较商品价格外，商家的信誉也很关键，第12题图是某购物网站上查看到的店铺动态评分：
这属于（ ）
A．个人推荐 B．统计评价
C．专家推荐 D．核心刊物评价
2．提出计算机内程序和数据都应采用二进制代码表示的是（ ）
A．摩尔 B．申农 C．比尔·盖茨 D．冯·诺依曼
3．关于计算机的指令、程序和软件，以下表述错误的是( )
A．为解决某问题组织起来的有序的指令集合称为程序
B．计算机软件包括程序和与该程序相关的文档资料
C．给计算机发出一条指令就是运行一个程序
D．计算机指令由操作码和操作数两部分组成
4．以下不属于人工智能的是（ ）。
A．语音汉字输入软件 B．金山译霸
C．在QQ游戏网与网友下棋 D．使用OCR汉字识别软件
5．将采集来的初始的、零乱的、孤立的信息进行分类和排序，就是对信息的（ ）
A．发布 B．获取 C．收集 D．加工
6．下列属于Word文档文件的是（ ）
A．统计.xls B．课程.wps C．软件.rar D．家园.doc
7．必须使用（ ）软件，才能查看因特网上的WWW信息。
A．IE B．Firefox C．浏览器 D．万维网
8．关于获取信息的方法，下列说法正确的是（ ）
A．应根据实际情况获取信息 B．利用网络获取信息是最好的方法
C．电子邮件是获取信息的最好的方法 D．信息交流是获取信息的最好的方法
9．为了全面分析我国水资源情况需要分析不同地区多年的数据，我们可以用不同方法取的这些数据。下面可以使用的是（ ）。
（1）网络爬虫；（2）在线问卷；（3）使用后羿采集器；（4）从网页中复制，在电子表格excel中粘贴
A．（1） B．（1）（2）（3） C．（2）（4） D．（1）（2）（3）（4）
10．在Windows资源管理器中，若要选择多个不连续的文件，应先按住（ ）键，然后依次单击相应文件。
A．Alt B．Shift C．Ctrl D．Tab
11．某班级共有62位同学，现在想要用二进制给每个同学编码，请问每个同学的编码至少需要多少个二进制位？（ ）
A．62 B．64 C．6 D．5
12．VB程序中“Dim n As Integer”这条语句的作用是（ ）
A．定义一个变量 B．定义一个数据处理方法
C．定义一个数据输入方法 D．定义一个事件过程
13．下列各赋值语句，语法不正确的是（ ）。
A．x+y=5 B．number=15
C．Label1.caption=time D．length=x+y
14．有一个数据文件未压缩时数据量为512KB，用WINRAR 软件压缩后得到一个压缩文件的数据量为128KB，则该压缩方法和压缩比分别为（ ）
A．有损压缩，压缩比为7：1 B．有损压缩，压缩比为4：1 C．无损压缩，压缩比为7：1 D．无损压缩，压缩比为4：1
15．如图所示为使用IE保存一个包含文字、图片等内容的网页，单击“保存”按钮后，下列相关描述中正确的是（ ）
A．该网页中的文字内容将被保存在“huiha.网页”文件中
B．该网页中的图片将被保存在“huiha.files”文件夹中
C．使用当前保存类型，只能保存网页中的文字信息
D．使用当前保存类型，只能保存网页中的图片
16．以下不属于信息社会的重要特征的是（ ）
A．以知识为基础的信息经济是最基本的经济形态，知识成为社会发展的巨大资源，以知识和人才为基础，以创新为主要驱动力
B．政府是最大的公共信息的采集者、处理者和拥有者
C．文化模式日趋虚拟化、单一化
D．工具数字化、方式数字化、内容数字化的社会生活，塑造出一种全新的生存与发展方式
17．如下图所示的Excel工作中，该工作簿的文件名和当前工作表的名称分别是（ ）。
A．电视机.xls家电销售统计 B．空调.xls家电销售统计
C．家电销售统计.xls 空调 D．家电销售统计.xls电视机
18．用QQ软件和朋友进行聊天时（ ）。
A．当两台终端连接不稳定，聊天内容由QQ服务器中转
B．当两台终端连接不稳定，聊天内容在两台终端之间传送
C．聊天内容肯定由QQ服务器中转
D．聊天内容肯定在两台终端之间传送
二、综合题（共6题）
19．新建一个Word 文档可以从“文件”菜单中选择“新建”，也可以点击“常用”工具栏上的“新建”按钮。（ ）
20．在Windows 7中，所有被删除的文件都是放在“回收站”中（_____）
21．编写VB程序，实现在一个升序排列的数组中查找绝对值最小的元素。已知数组元素由正整数、负整数和0构成。例如：数组元素值为[-9，-5，-3，-1，2，5，7，17]，该数组中绝对值最小的元素为-1，程序运行时，产生n个元素，在列表框List1中显示，单击按钮Commandl，在标签Labell中输出绝对值最小的元素。运行结果如图所示。
实现上述功能的VB代码如下：
Const n=15
Dim a(1 To n)As Integer
Private Sub Form_Load()
产生n个由正整数、负整数和0构成的元素,存储在数组a中,并升序排列,代码略
End Sub
Private Sub Commandl_Click()
Dim i As Integer,j As Integer,m As Integer,absmin As Integer
flag= False: i=1:j=n
Do While
m=(i+j)\2
If a(m)=0 Then
flag=True: absmin=a(m): Exit Do
Elself a(m) > 0 Then
If ① Then
j=m-1
Else
Fla=True
absmin=dmin(a(m-1),a(m))
End If
Else
If a(m+1)< 0 Then
i=m+1
Else
flag =True
②
End If
End If
Loop
Label1.Caption="绝对值最小的元素是:"+Str(absmin)
End Sub
Function dmin(x As Integer,y As Integer)As Integer
If Abs(x)＜Abs(y)Then dmin=x Else dmin=y
End Function
（1）结合界面和代码，程序中没有使用到的控件是____________（单选，填字母：A．」/B．/c. /D．A）
（2）程序加框处代码有错，请改正。
改正：________________________________
（3）请在划线处填入合适的代码。
①__________________________________
②__________________________________
22． 小杰为学校教务处编写了一个排考场座位的VB程序，考场采用“6排5列”共30人的模式，程序执行后，考生的考号与姓名显示在列表框List1中，单击“考场座位”按钮，考场号与座位显示在Text1中，程序运行界面如图所示，数据表如图
实现上述功能的VB程序如下，请回答下列问题：
（1）程序中读取的数据库文件是____________
（2）当“Form_load() 事件处理过程运行结束后，变量x的值为___________
（3）请在划线处填入合适的代码
Dim sName(100) As String Dim kh(100) as string Private Sub Command1_Click() Dim y As Integer Dim start As Integer　 　 '考场第1位数据元素的下标 Dim pa As Integer '数据库导入VB时学生数据下标 Dim pb As Integer '考场座位数据下标 Dim i As Integer，j As Integer，k As Integer，m As Integer Dim kcsName(100) As String start = 1 pa = start recCount = x-1 If recCount Mod 30 <> 0 Then 　 　 　 　 　 _______________ 　 　 　 　 　 For i = 1 To y　 　 　 '将当前考生人数添加到30的整数倍 　 　 　 　 recCount = recCount +1 　 　 　 　 sName(recCount) = " " Next i End If For j = 1 To recCount / 30 　 　 pa = start 　 　 pb = start 　 　 For i = 1 To 30 　 　 　 　 kcsName(pb) = sName(pa) 　 　 　 　 pb = pb +1 　 　 　 　 If i Mod 5 = 0 Then 　 　 　 　 　 　 pa = start +i \5 　 　 　 　 Else 　 　 　 　 　 　 　 　 　 ________________ 　 　 　 　 　 End If 　 　 Next i 　 　 start = start +30 Next j Text1.Text = " " start = 1 For k = 1 To recCount /30 　 　 m = start 　 　 Text1.Text = Text1.Text + "第" + Str(k) + "考场" + vbCrLf 　 　 'vbCrLf为换行标志符，实现Text1中内容换行显示 　 　 For i = 1 To 6 　 　 　 　 For j = 1 To 5 　 　 　 　 　 　 Text1.Text = Text1.Text +"　 " +kcsName(m) 　 　 　 　 　 　 m = m +1 　 　 　 　 Next j 　 　 　 　 Text1.Text = Text1.Text +vbCrLf 　 　 Next i 　 　 Text1.Text = Text1.Text +vbCrLf +vbCrLf 　 　 　 　 　 ______________________ Next k End Sub Private Sub form_load() Dim conn As New ADODB．Connection Dim rs As New ADODB．Recordset conn.ConnectionString = "provider=microsoft.ace.oledb.12.0;data source=" & App.Path & "/kaochang.accdb" conn.Open Set rs.ActiveConnection = conn rs.Open "select * from banji" x = 1 List1.AddItem "　 考号　 　 姓名" Do While Not rs.EOF ' kh(x) = rs.fields("kh") sName(x) = rs.fields("xm") List1.AddItem kh(x) + " " + sName(x) x = x + 1 rs.MoveNext Loop rs.Close End Sub
23．列举Python程序设计语言中，for循环和while循环的基本的格式。
24．简述删除文件的4种方法
参考答案
1．B
2．D
3．C
4．C
5．D
6．D
7．C
8．A
9．D
10．C
11．C
12．A
13．A
14．D
15．B
16．C
17．D
18．A
19．正确
20．错误
21．C Not flag或Not flag And i＜=j ①a(m-1)>0或a(m)* a(m-1)>0或a(m)+a(m-1)＞0或其他同等答案 ②absmin=dmin(a(m),a(m+1))或absmin=dmin(a(m+1),a(m))或其他同等答案
22．kaochang.accdb 47 y=30-recCount Mod 30或其它等价表达式 pa=pa+6 start=start+30
23．for 循环结构的基本格式：
for 循环变量 in 列表：
语句或语句组
While循环格式：
While（表达式）：
语句或者语句组
24．1.用鼠标选中文件，然后按下键盘上的DEL键，这时候会弹出是否删除文件的对话框，先择是。
2.用鼠标选中文件，然后用鼠标在文件上单击右键，在弹出的对话框中选择删除。
3.用鼠标选中文件，然后按下键盘上的SHIFT+DEL组合键，彻底删除。
4.删除不连续的多个文件，使用Ctrl键依次选中需要删除的文件，然后按下键盘上的DEL键，或按SHIFT+DEL组合键彻底删除；删除连续的多个文件，使用Shift键选中第一个和最后一个文件，然后按下键盘上的DEL键，或按SHIFT+DEL组合键彻底删除。