2019-2020学年浙江省“七彩阳光”新高考研究联盟高三(上)月考信息技术试卷(12月份)
发布:2024/11/8 8:30:2
一、选择题(本大题共12小题,每小题2分,共24分,每小题列出的四个备选项中只有一个是符合题目要求的,不选、错选、多选均不得分.)
-
1.下列有关信息与信息技术的说法,正确的是( )
①信息可以重复使用而不产生损耗
②信息的表示、传播、存储不一定依附于某种载体
③信息可以脱离它所反映的事物被存储、保存和传播
④信息的加工和管理必须使用计算机才能完成
⑤近代信息技术有摄影技术、微电子技术、广播和电视技术组卷:9引用:1难度:0.5 -
2.超文本标记语言用于描述网页的内容,该语言的简称为( )
组卷:10引用:1难度:0.7 -
3.使用UltraEdit软查看字符的内码,部分界面如图所示。下列说法正确的是( )
组卷:2引用:1难度:0.5 -
4.对于数据库和数据表的操作,下列说法正确的是( )
组卷:4引用:1难度:0.5 -
5.下列3 幅图均为800×600像素、24位色的BP图象,以下说法正确的是( )
组卷:10引用:1难度:0.5
二、非选择题(本大题共4小题,第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
-
15.如果一个数大于等于 4,它的平方根肯定不会超过它自己,且一个数的平方根最多不会超过它的一半,例如求 8的平方根,8的一半是 4,4^2=16>8,如果这个数越大越是如此。小王利用这一规律使用对分查找思想计算某数的算术平方根,编写了一个 VB程序,功能如下:单击“产生”按钮 Command1,产生一个大于等于 0且小于 100的随机整数,并显示在文本框 Text1中;单击“计算”按钮 Command2,在文本框 Text1中显示随机整数的平方根,且结果只保留整数部分,小数部分舍去。程序运行界面如图所示:
(1)观察程序界面,具有Caption属性的对象有
(2)程序代码中,将横线处代码补充完整。
(3)程序代码中,加框处有错,请改正。
Private Sub Command1_Click ( )
Dim a As Integer
Randomize
Text1.Text=Str(a) End Sub
Private Sub Command2_Click
Dim L As Integer,R As Integer,m As Integer Dim x As Integer,square As Integer
x=Val(Text1.Text) L=0
R=
Do While L<R
m=(L+R)\2'改错square=m*m
If square>x Then R=m-1
Else
End If Loop
Text2.Text=Str(L) End Sub组卷:0引用:1难度:0.5 -
16.已知数轴上有一条长度为 L(L为偶数)的线段,左端点在原点,右端点在坐标 L处。有 n个不计体积的小球在线段上,开始时所有的小球都处在偶数坐标上,速度方向向右,速度大小为 1单位长度每秒。当小球到达线段的端点(左端点或右端点)的时候,会立即向相反的方向移动,速度大小仍然为原来大小。当两个小球撞到一起的时候,两个小球会分别向与自己原来移动的方向相反的方向,以原来的速度大小继续移动。小王设计了一个模拟碰撞的小球的程序,其功能为:在文本框 Text1、Text2和 Text3中分别输入线段长度 L、小球数量 n以及运动时间 t,在文本框 Text4 中输入 n个小球的初始坐标位置,单击“求解”按钮 Command1,计算 t秒之后,各个小球的位置,并在标签框 Label5 上显示结果。
(1)实现上述功能的VB程序如下,请在横线处填入合适代码。
Private Sub Command1_Click ( )
DimnAsInteger,LAs Integer,tAsInteger Dim i As Integer,j As Integer,k As Integer Dim s As String,result AsString
Dim a(1 To 50)As Integer,dir(1 To 50)As Integer
L=Val(Text1.Text):n=Val(Text2.Text):t=Val(Text3.Text) s=Text4.Text
s=s+″.″:tmp=0:k=0 For i=1 ToLen(s)
ch=Mid(s,i,1)
If ch>=″0″And ch<=″9″Then tmp=tmp*10+Val(ch)
Else
k=k+1
a(k)=tmp:dir(k)=1 tmp=0
End If Next i
For i=1 To t For j=1 To n
If
Else
For c=1 To n
If
dir(j)=(-1)*
dir(j) End If
Next c End If
Next j Next i
For i=1 To n
result=result+Str(a(i)) Nexti
Label5.Caption=Str(t)+″秒后小球的位置为:″+result End Sub
(2)若文本框Text3中输入的内容为“4”,单击“求解”按钮后,在标签框Label5 中显示的结果为组卷:0引用:1难度:0.4