2018-2019学年浙江省丽水市高二(下)月考信息技术试卷(3月份)
发布:2024/4/20 14:35:0
一、选择题(本大题共12小题,每小题2分,共24分.每小题列出的四个备选项中只有一个是符合题目要求的,不选、多选、错选均不得分.)
-
1.某软件通过分析买家的信用评价数据,告诉店主该买家是属于正常买家还是属于“职业差评师”,对此以下说法错误的是( )
组卷:11引用:3难度:0.9 -
2.下列关于网站和网页说法不正确的是( )
组卷:18引用:2难度:0.5 -
3.小华使用清华 TH-OCR 软件进行字符识别时,若要取消已划分的识别区域,可使用“图象”菜单下的命令是( )
组卷:17引用:2难度:0.4 -
4.使用Access软件创建的数据表,其设计视图的部分界面如图所示,下列说法不正确的是( )
组卷:19引用:3难度:0.5 -
5.关于位图和矢量图的说法,下列正确的是( )
组卷:11引用:2难度:0.6
二、非选择题(本大题共4小题,其中第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
-
15.统计学中的“中位数”是这样的一种数:一组数据里的一半的数据比它大,而另外一半数据比它小。计算一组数据的中位数的方法是:把所有数据按照非升的次序排列。如果数据的个数是奇数,则中间那个数就是这组数据的中位数;如果个数是偶数,则中间两个数的算术平均值是中位数。
小诗收集了全市部分教职员工的工资数据,设计了找中位数的程序如下。小诗收集的人员工资数据放在了 Access 数据库中。小诗的程序在窗体加载时读出了所有人员的数据:姓名放在数组a中,对应的工资放在数组b中,数据总记录数放在n中。单击按钮 Command1后先以工资按非升的次序排序,然后找出中位数。
(1)要使程序运行时,从数据库中读取所有人员的数据,可在事件过程中添加相关代码。
Dim a(1 To 1000)As String
Dim b(1 To 1000)As Single
Dim n As Integer
‘数据库读取所有人员的数据代码略
Private Sub Command1_Click ( )
Dim i As Integer,j As Integer,k As Integer
Dim tmp1 As Single,tmp2 As String
Dim median As Single
For i=n To 2 step-1
k=i
For j=i-1 To 1 step-1
IfThen
k=j
End If
Next j
If k<>i Then
tmp1=b(k):b(k)=b(i):b(i)=tmp1
tmp2=a(k):a(k)=a(i):a(i)=tmp2
End If
Next i
For i=1 To n
List1.AddItem Str(i) &““& a(i) &““& Str(b(i))
Next i
If n Mod 2=0 Then
median=② Else
median=b(n\2+1)
End If
Label1.Caption=“中位数是:“& Str(median)
End Sub
(2)将横线处代码补充完整。
(3)程序代码中,波浪线
(4)如图所示,数据库中一共有个教职员工。组卷:11引用:2难度:0.3 -
16.在Excel中进行数据排序,先按主关键字进行排序,主关键字相同的记录再按次关键字进行排序。编写一个VB程序,功能如下:在文本框Text1中随机产生100个两位数的正整数作为主关键字,在文本框Text2中随机产生100个两位数的正整数作为次关键字,单击“排序”按钮Command1,在列表框List1中显示排序后的结果(主、次关键字均为降序)。程序运行界面如图所示。
(1)观察代码,该排序过程中,交换次数最多能达到
(2)实现上述功能的VB程序如下,请在横线处填入正确语句。
Dim z(1 To 100)As Integer
Dim c(1 To 100)As Integer
‘文本框获取主、次数组数据代码略
Private Sub Command1_Click ( )
Dim i As Integer,j As Integer
i=1
Do While i<=99
j=100
Do While ①
If z(j)>z(j-1)Or ②
t=z(j):z(j)=z(j-1):z(j-1)=t
t=c(j):c(j)=c(j-1):c(j-1)=t
End If
j=j-1
Loop
③
Loop
List1.AddItem““+“主“+““+“次“
For i=1 To 100
List1.AddItem Str(z(i))+Str(c(i))
Next i
End Sub组卷:8引用:2难度:0.4