2018-2019学年浙江省温州十五校联合体高二(下)期中信息技术试卷
发布:2024/4/20 14:35:0
一、选择题(本大题共12小题,每小题2分,共24分,每小题列出的四个备选项中只有一个是符合题目要求的,不选、错选、多选均不得分.)
-
1.下列有关信息与信息技术的说法,不正确的是( )
组卷:8引用:1难度:0.5 -
2.下列有关浏览器与网页的说法,正确的是( )
组卷:6引用:1难度:0.5 -
3.使用Word软件编辑某文档,部分界面如图所示。下列说法正确的是( )
组卷:11引用:3难度:0.5 -
4.用OCR软件进行文字识别时,部分界面如图所示,下列说法不正确的是( )
组卷:9引用:1难度:0.5 -
5.使用GoldWave软件编辑某音频文件,部分界面如图所示。下列说法正确的是( )
组卷:3引用:5难度:0.5
二、非选择题(本大题共4小题,第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
-
15.把一个数组最开始的若干个元素搬到数组的末尾,我们称之为数组的旋转。输入一个递增排序的数组的一个旋转,输出旋转数组的最小元素。
数组元素a(1)至a(5)依次为5,22,28,42,55,在a(3)处分成两段,交换位置后为:旋转数组a的最小元素是5。a(1) a(2) a(3) a(4) a(5) 28 42 55 5 22 d(1) d(2) d(3) d(4) d(5) 1 0 1 1 1
小明依据查找算法思想,设计一个查找旋转数组d最小元素的程序,功能如下:运行程序时,利用“添加”按钮Command1和文本框Text1依次输入旋转数组d的值,在列表List1中显示旋转数组,单击“求解”按钮Command2,在标签Label2中显示旋转数组d最小元素值。运行效果如图所示,实现该功能的VB程序如下。
(1)要使程序运行时,文本框Text1无显示内容,下列方法不能实现该要求的是
(2)程序代码中,加框处有错,请改正。
(3)程序代码中,将横线处代码补充完整。
(4)程序代码中,虚线框内自定义函数中主要采用的算法是
Dim n As Integer
Dim d(1 To 100)As Integer'数组 d 存储待排序数据
Private Sub Command1_Click ( )
'按旋转数组规则将数据存入数组d中,代码略
End Sub
Private Sub Command2_Click ( )
Dim mid As Integer,L As Integer,R As Integer
L=1:R=n
mid=L
Do While d(L)>=d(R)
IfThen'改错
mid=R
Exit Do
End If
mid=(L+R)\2
If d(L)=d(R) And d(mid)=d(R) Then
mid=
Exit Do
End If
If d(L)<d(mid) Then
L=mid
ElseIf d(mid)<d(R) Then
R=mid
End If
Loop
Label2.Caption=“最小值为“+Str(d(mid))
End Sub
End If
Next i
End Function组卷:0引用:1难度:0.3 -
16.“旋转数组”过程是指将数组中的元素向右移动k个位置,其中k是非负数。以数组a向右移动3个位置为例,其移动过程有如下两种方法:
原始数据:a(1) a(2) a(3) a(4) 1 2 3 4
①向右旋转1步:a(1) a(2) a(3) a(4) 4 1 2 3 a(1) a(2) a(3) a(4) 3 4 1 2 a(1) a(2) a(3) a(4) 2 3 4 1
①将a(1)值放至旋转3个位置后位置a(4):a(1) a(2) a(3) a(4) 1 2 3 1 a(1) a(2) a(3) a(4) 1 2 4 1 a(1) a(2) a(3) a(4) 1 3 4 1 a(1) a(2) a(3) a(4) 2 3 4 1
(1)当文本框Text3中输入内容修改为3时,执行该程序后,a(3)的值为
(2)请在横线处填入合适的代码。
Dim a(20)As Integer
Const n=20
Private Sub Form_Load ( )
'随机产生n个[1,100]之间的随机整数,依次存储到a(1)、a(2)、…a(n)中,并在文本框Text1显示,代码略
End Sub
Private Sub Command1_Click ( )
Dim i As Integer,p As Integer,k As Integer,cnt As Integer,c As Integer,t As Integer
p=Val(Text2.Text)
k=Val(Text3.Text)
i=1:start=1:c=a(i):cnt=1
Do While cnt<=p'方法二
i= ①
t=a(i)
a(i)=c
If ② Then
start=start+1
i=i+1
c=a(i)
Else
c=t
End If
cnt=cnt+1
Loop
For i=1 To k'方法一
temp=a(n)
For j= ③
a(j)=a(j-1)
Next j
a(p+1)=temp
Next i
For i=1 To n
s=s+Str(a(i))
Next i
Text4.Text=s
End Sub组卷:3引用:1难度:0.4