2015-2016学年浙江省杭州市高三(上)质检信息技术试卷
发布:2024/12/31 16:0:2
一、选择题(共12小题,每小题2分,满分24分)
-
1.下列软件中,不能用于网页编辑处理的软件是( )
组卷:10引用:3难度:0.9 -
2.某品牌无人机部分参数如图所示下列关于该无人机说法不正确的是( )
组卷:10引用:5难度:0.9 -
3.用Word的修订状态编辑新闻稿,部分界面如图所示.如果全部接受图中所示的修订内容,则黑框内的文字将变为( )
组卷:8引用:3难度:0.9 -
4.在Access软件中,执行删除某一条记录时的界面如图所示.单击“是(Y)”后发现删除错误,下列操作能恢复被删除记录数据的是( )
组卷:9引用:4难度:0.9 -
5.某算法的部分流程图如图所示.执行这部分流程后,变量x,y的值分别是( )
组卷:5引用:3难度:0.5
二、解答题(共5小题,满分26分)
-
16.将一组数据按大小顺序排列,处在最中间位置的一个数叫做这组数据的中位数.当数据个数n为奇数时,处于中间位置的变量值即为中位数;当个数n为偶数时,中位数则处于中间位置的2个变量值的平均数.
小李编写了一个计算机中位数的VB程序:从数据库读取某一指定科目的相关数据存储在数组a中,计算并输出这组数据的中位数.
程序功能如下:在文本框Text1中输入科目名称,单击“读数据库”按钮Command1,程序从数据库读取数据;单击“输出中位数”按钮Command2,程序进行统计处理,输出结果在文本框Text2中.程序运行界面如图所示.
实现以上功能的VB程序如下,请回答下列问题:
(1)分析程序,可知数据库的文件名为
(2)请在横线处填入合适的代码.
Dim a(1 To 1000)As Integer'存储某科目的相关数据,数组大小满足处理要求
Dim n As Integer'该科目的学生总人数
Private Sub Command1_Click( )
'从数据库中读取指定科目的各相关数据,存储在数组a中
Dim conn As New ADODB.Connection,rs As New ADODB.Recordset
conn.ConnectionString=“Provider=Microsoft.ACE.OLEDB.12.0;Data Source=“+App.Path+“\students.jye.ai“
conn.Open
Set rs.ActiveConnection=conn
'本过程的其他语句略
End Sub
Private Sub Command2_Click( )
Dim i As Integer,j As Interger,k As Integer,kt As Integer
Dim c As Integer,zws As Single
For i=1 To n-1
For j=i+1 To n
If a(j)>a(k) Then
kt=a(j):a(j)=a(k):a(k)=kt
End If
Next j
Next i
c=n\2
If n Mod 2=1 Then
zws=
Else
zws=(a(c)+a(c+1))/2
End If
Text2.Text=Str(zws)
End Sub.组卷:2引用:1难度:0.1 -
17.在计算机系统中,数值一般用补码来表示和存储,补码由符号位和数值位两部分 组成,符号位用0表示正数,用1表示负数.例如,整数n(-128≤n≤127)用8位二进制补码的表示方法为:
符号位(1位) 数值位(7位) 第1位(最高位) 第2~8位
例:12的8位二进制表示00001100,最高位即符号位“0”表示正数.
②负数:除符号位外,所有位取反,然后+1.
例:-5的8位二进制补码表示方法如下,5对应7位二进制数为0000101 (原码),所有位取反后为1111010(反码),再加1后为1111011(补码),再设置符号位为1,因此-5 用8位二进制补码表示为11111011.
小明设计了一个VB程序,点击“补码”按钮Command1,将文本框Text1中输入的整数 n(-128≤n≤127)转换成相应的补码,并在文本框Text2中输出,程序结果如图所示,请将横线处的代码补充完整.
Private Sub Command1_Click ( )
Dim n As Integer,a As Integer,i As Integer
Dim m(1To 8)As Integer
Text2.Text=““
n=Val(Text1.Text)
If n>=0The
‘计算二进制原码
For i=8To 2Step-l
m(i)=n Mod 2
n=n\2
Next i
‘设置符号位
m(1)=0
Else
n=-n
‘计算二进制反码
For i=8To 2Step-l
m(i)=①
n=n\2
Next i
‘加1计算
i=8
Do While m(i)=1
②
i=i-1
Loop
m(i)=1
‘设置符号位
m(1)=1
End If
’输出结果
For i=l To 8
Text2.Text=Text2.Text & m(i)
Next i
End Sub
(1)-27用8位二进制补码表示为
(2)请在横线处填入合适的代码.组卷:19引用:4难度:0.1