2017-2018学年浙江省“超级全能生”高三(下)联考信息技术试卷(3月份)
发布:2024/11/7 10:0:3
一、选择题本大题共12小题,每小题2分,共24分.在每小题给出的四个选项中,只有一个符合题目要求)
-
1.下列关于信息和信息技术的说法正确的是( )
组卷:2引用:1难度:0.6 -
2.下列选项中,不属于人工智能技术的是( )
组卷:2引用:1难度:0.6 -
3.可以解释执行下面代码的软件是( )
<html>
<head>
<meta http-equiv=“Content-type“content=“text/html;charsel=gb2312“>
<title>无标题文档(/title)
<style type=“text/css“>
<1-
body{
margin-top:0px;
background-image:url( );
)组卷:6引用:1难度:0.5 -
4.关于下面这个Access数据表,以下说法正确的是( )
组卷:3引用:2难度:0.7 -
5.某算法的部分流程图如图所示,执行这部分流程后,变量x,y的值分别变为( )
组卷:0引用:1难度:0.5
二、非选择题(本大题共5小題,其中第13小題↓分,第14小題5分,第15小题8分,第16小题3分,第17小题6分,共26分
-
16.活动课上,n个学生要两两组队进行拔河比赛,要求每个小组总体重不超过120kg,小林想知道最多可以组多少个队伍,并希望得到一组可行的组队方案。于是设计如下界面的程序,在文本框Text1中输入n个学生的体重(数字之间用逗号隔开),单击“队伍”按钮( Command1)后,标签( Labell)显示最多可组队伍数量,同时在列表框(List1)输出方案。
实现上述功能的VB程序如下,请在画线处填入合适代码。
Dim n As Integer'n用于记录数字个数
Dm a( 1 To 50)As Integer
Private sub Cortmandl_Click( )
Dim s As String
Dim i As Integer,j As Integer,t As Integer
Dim cnt As Integer
Dim st As Integer,ed As Integer
s=Text1.Text
makedata(s)'将输入的体重分别存入数组a中,过程代码略!
For i=I To n-1
For j=n To i+1 Step-1
If(1)Then'从大到小排序
1=a(j):a (j)=a(j-1):a(j-1)=t
End If
Next j
Next i
'下列程序段实现计算最多可组队伍
cnt=0
st=1:ed=n
Do While st<ed
If a(st)+a(ed)<=120 Then
List1.Additem str(a(st))+″和″+Str(a(ed))+″组队″
cnt=cnt+1
st=st+1
(2)
Else
st=st+1
End If
Loop
Labell.Caption=″最多可以组″+Str(cnt)+″组队伍″
End sub组卷:0引用:1难度:0.5 -
17.设计VB应用程序,输入一段英文,统计单词个数和单词平均长度,该段英文中可能出现符包括大小写英文字母、数字、特殊字符,标点符号(逗号,句号,空格,感叹号,问号,分号,双引号),大小写字母和数字算单词组成部分,其他都不计算,程序界面如下。
实现上述功能的VB程序如下,请在点线处填入合适代码。
Private Sub Command Click( )
Dim s As String
Dim n As Integer
Dim cnt As Integer,i As Integer
Dim num As Single,ch As Single,ave As single
s=Text1.Text
n=Len(s)
num=0
ch=0
cnt=0
ave=0
For i=1 To n
c=Mid(s,i,1)
If(1)Then
cnt=cnt+1
Elself c>=″A″And e<=″Z″Then
cnt=cnt+1
EiseIf c>=″0″And c<=″9″Then
cnt=cnt+l
Else
If cnt>0 Then
num=num+1
ch=ch+cnt
(2)
End If
End If
Next i
If cnt>1 Then
nun=nun+1
ch=ch+cnt
End If
Label1.Caption=″总共有″+Str(num)+″个单词,平均长度为″+Str(ave)
End Sub组卷:0引用:1难度:0.5