相关试卷
-
1、有一个单击按钮过程，其作用是产生50个60~100 的随机数，统计其中被6整除余2的个数，并将这些数输出。请补充下面的程序：
Private Sub command1_click()
Dim X, N As Integer
im count As Integer 'count 用来保存能被 6 整除余 2 的数据的个数
Randomize Timer '随机数初始化，以时钟为随机数种子
For N = 1 To 50
X = + int(Rnd * 40) '随机产生 50 个 60~100 的随机数
If X Mod 6 = 2 Then
List1.AddItem Str(X)
End If
Next N
Label1.Caption=str（count）
End Sub
-
2、看流程图得结果，变量s和i的值分别是（ ）。
A、5 和 3 B、6 和 3 C、8 和 6 D、6 和 6 -
3、看流程图得结果，变量s和i的值分别是（ ）。
A、2 和 2 B、2 和 0 C、1 和 2 D、1 和 0 -
4、下列能表示“x和y”都不为零的表达式是（ ）A、(x<>0) And (y<>0) B、X<>0,y<>0 C、(x<>0) Or (y<>0) D、X<>0:y<>0
-
5、人事部需要将入职员工的信息录入到员工信息表中，如图所示，下列选项中的数据能作为其记录的是（ ）
A、
B、
C、
D、
-
6、BMI指数是衡量人体胖瘦程度以及是否健康的一个标准。当 BMI值达到35时，输出T的值为（ ）
A、过轻 B、正常 C、肥胖 D、非常肥胖 -
7、如图所示的Word文档界面中，使用的Word的功能是（ ）
A、自动更正 B、修订 C、查找与替换 D、批注 -
8、某电费清单如下图所示
其中，本月应缴电费=（本月表数-上月实数）×单价，为了运用填充柄进行快速计算，应在E2单元格输入（ ）
A、=（82-34）*1.2 B、=（C2-B2）*D2 C、=SUM（（C2-B2）*D2） D、=（$C$2-$B$2）*$D$2 -
9、下面属于文本类型文件的是（ ）A、.gif B、.txt C、.jpg D、.swf
-
10、很多地方都可以看到由黑白两色图案组成的二维码，只要用手机摄像头对着二维码扫一下，手机就可以跳转到相关的网站或者显示出二维码图像包含的信息，这是利用了人工智能的（ ）A、图像识别技术 B、语音识别技术 C、指纹识别技术 D、数字高清技术
-
11、下列选项中，不属于信息的是（ ）A、报上登载的中国“神舟七号”载人飞船成功发射的信息 B、信息技术考试成绩 C、电视中播出的奥运比赛各国金牌数 D、DVD 电影光盘
-
12、【加试题】给定m个区间和1个数组（有n个元素），现要求根据各区间限定的取值范围，将数组依次分隔成m+1个段。具体分割方法如下：
第1段是从数组首个元素开始、元素值都属于第1区间的最长连续元素段。如果首个元素不属于第1区间，则第1段元素个数为0；
第1段分割后的剩余元素，用同样的方法来依次分割第2段、第3段、…、第m段；
第m段分割后的剩余元素分割到第m+1段（剩余段）。
若第p（1≤p≤m-1）段末尾连续元素的值也同时属于第p+1区间，则这块连续元素称为第p段“重叠块”，该段其余部分称为第p段“非重叠块”。由于不存在第m+1区间，这里特别规定：第m段的全部元素都分割到m段“非重叠块”，第m段“重叠块”的元素个数为0，一个数组分段示例如下图。图中数组第1个元素10不属于第1区间[0,5]，因此第1段的元素个数为0。10和20属于第2区间，而33不属于第2区间，因此第2段只包含10和20两个元素。第3段末尾连续3个元素的值也同时属于第4区间，因此，第3段“非重叠块”包含33,58,46，第3段“重叠块”包含55,62,69。
(1)、给定2个区间依次为[10,50]、[30,80]，数组各元素为“12,44,34,45,66,50,45,70”，则第1段“重叠块”中的元素个数为个。(2)、小李根据上述描述，设计了一个统计各段“非重叠块”、“重叠块”和剩余段中元素个数的算法。算法的VB程序如下，请在划线处填入合适的代码。Const n = 18, m = 6
Dim a(1 To n) As Integer
Dim b(1 To 2 * m) As Integer
'b(1)、b(2)为第1区间的下限和上限， b(3)、b(4)为第2区间的下限和上限，…
Dim c(1 To 2 * m + 1) As Integer
'数组c用于保存统计结果：
'c(1)、c(2)分别存储第1段“非重叠块”和“重叠块”的元素个数，
'c(3)、c(4)分别存储第2段“非重叠块”和“重叠块”的元素个数，…
'c(2m-1)存储第m段"非重叠块"元素个数，c(2m)存储第m段"重叠块"元素个数(值为0)
'c(2m+1)存储剩余段元素个数
Private Sub Command1_Click()
Dim i As Integer, p As Integer, L As Integer, LL As Integer
‘读取n个数据并保存在数组a中，代码略
‘读取m个区间的下限和上限并保存在数组b中，代码略
For i = 1 To 2 * m + 1
c(i) = 0
Next i
i = 1: p = 1
L = 0: LL = 0
Do While ①
If IsIn(i, p) Then
If IsIn(i, p + 1) Then
LL = LL + 1
Else
②
LL = 0
End If
i = i + 1
Else
c(2 * p - 1) = L
c(2 * p) = LL
L = 0: LL = 0
p = p + 1
End If
Loop
If i <= n Then
c(2 * p - 1) = n - i + 1
Else
c(2 * p - 1) = L
c(2 * p) = LL
End If
‘输出统计结果，代码略
End Sub
‘函数IsIn用来判断a(i)值是否属于第p区间
Function IsIn(i As Integer, p As Integer) As Boolean
If p > m Then
IsIn = False
Else
If ③ Then IsIn = True Else IsIn = False
End If
End Function
① ② ③
-
13、【加试题】小明基于冒泡排序思想设计了一个改进的排序算法。该算法先用冒泡法将数组a中奇数位置的元素、偶数位置的元素分别进行排序，然后再进行后续处理。算法的VB程序段如下，但加框处代码有错，请改正。
’待排序数据存储在数组a中（a（1）~ a（n）），要求升序排列
For i = 1 To (n - 1) \ 2
For j = 1 To n - i * 2
If
Then ‘⑴t = a(j): a(j) = a(j + 2): a(j + 2) = t
End If
Next j
Next i
For i = 1 To n \ 2
j = 2 * i - 1
If a(j) > a(j+1) Then t = a(j): a(j) = a(j+1): a(j+1) = t
Next i
For i =
Step 2 ‘⑵t = a(i): j = i - 1
Do While t < a(j)
a(j + 1) = a(j): j = j - 1
Loop
a(j + 1) = t
Next i
⑴ ⑵
-
14、小华使用Flash软件创作主题为“四季花香”的多媒体作品，如图a所示。
图a
请回答下列问题：
(1)、根据创作方法和特点划分，Flash软件属于以为基础的多媒体创作工具。（选填，填字母，A .页/B .图标和流程图/C .时间序列/D .程序语言）(2)、将动画GIF文件“蝴蝶．gif”导入库中直接得到一个影片剪辑元件，则该元件中动画的动画类型是。（选填，填字母，A .逐帧动画/B .形状补间动画/C .动画补间动画）(3)、测试影片时，为了使该场景动画播放完后能自动从本场景第1帧开始播放，可在图层（填图层名称）的第50帧添加动作脚本。(4)、测试该场景时，“诗句”图层内容在播放完第40帧后消失，为了使该图层第40帧内容再延续1秒，下列操作可行的是。（多选题，填字母，A .选中“诗句”图层第41帧执行“清除关键帧”操作；B .将“诗句”图层第50帧执行“插入关键帧”操作；C .删除“诗句”图层第41帧，在第50帧执行“插入帧”操作；D .选中“诗句”图层第40帧执行“复制帧”操作，在第41帧执行“粘贴帧”操作；E .选中“诗句”图层第50帧执行“插入帧”操作，在第41帧执行“清除关键帧”操作）(5)、“暂停”按钮实例的动作脚本为on(press){stop();}，“继续”按钮实例的动作脚本为on(press){play();}，测试该场景，单击“暂停”按钮时动画和声音同时停止播放，单击“继续”按钮时动画和声音同时继续播放，则“声音”图层中声音的同步属性为。(6)、测试影片时弹出如图b所示的错误提示窗口，由图中信息可知，该动作脚本设置在上（选填，按钮/关键帧）。
图b
-
15、小王设计“模拟撤销”程序，需要用一个“历史记录”，“历史记录”是在对字符串s进行插入或删除时，将每步操作信息依次存储得到的，操作信息由操作符（“+”表示插入，“－”表示删除）、操作位置和操作字符串（只包含英文字母）构成，例如，“+23abc”表示在字符串s第23个位插入了“abc”，“模拟撤销”过程按照“历史记录”的逆序进行，将字符串s的内容恢复到初始状态。对字符串“Book”的操作与撤销过程，如a所示。
图a
图b
小王编写的“模拟撤销”VB程序如下，文本框 Text1中的内容是撤销前字符串，文本概Text2中的内容是历史记录，单击“撤销”按钮Command1后，在标签Label1中显示撤销过程，程序运行界面如图b所示。
(1)、实观上述功能的VB程序如下，在程序中出现的对象没有Caption属性的是 。（选填，填字码：A .Label1 /B .Command1 /C .Text1和Text2）(2)、请在划线处填入合适代码。Private Sub Command1_Click()
Dim s As String, t As String, ch As String
Dim c As String, num As String, ss As String
Dim n As Integer, i As Integer
s = Text1.Text: t = Text2.Text
c = "": num = "": ss = s
For i = Len(t) To 1 Step -1
①
If ch >= "a" And ch <= "z" Or ch >= "A" And ch = "Z" Then
c = ch + c
ElseIf ch >= "0" And ch <= "9" Then
num = ch + num
Else
n = Val(num)
If ch = "－" Then
s = Mid(s, 1, n - 1) + ②
Else
s = Mid(s, 1, n - 1) + Mid(s, n + Len(c), Len(s) - n - Len(c) + 1)
End If
ss = ss + "→" + s
c = "": num = ""
End If
Next i
Label1.Caption = ss
End Sub
① ②
(3)、运行该程序，若文本框Text1中的内容是"April"，文本框Text2中的内容是“－3p+3ri－6e”，单击撤销按钮，For循环语句执行完成后，字符串s的值是。 -
16、小李收集了2018年浙江省各地区消费者信心指数数据，并使用Excel软件进行了数据处理。他将区域B3:H3单元格格式设置为“数值”，并保留小数位数1位。如图a所示，请回答下列问题：
图a
(1)、区域H3:H13的数据是通过公式计算得到的：在H3单元格中输入公式,再利用自动填充功能完成区域H4:H13的计算。(2)、区域A2:H13数据区域已进行了排序。排序时，选择的主要关键字为“第四季度增长率（%）”，次要关键字选择“第四季度”，排序次序都为“降序”。按上述步骤正确操作后，排在第1位的地区是“衢州”而不是“台州”，原因是。(3)、根据图a中的数据制作了图表，如图b所示，创建该图表的数据区域是
图b
-
17、【加试题】有1个升序排列的数组a(a(1)～a(n)，n≥3)，从左到右相邻两个元素的差值（后一个元素值减去前一个元素值）先由小到大、再由大到小，且相邻两个差值不相等，为了查找相邻两个元素的最大差值，小李编写的VB程序段如下：
i = 1 ：j = n
Do While i + 1 < j
m = (i + j) \ 2
If a(m + 1) - a(m) > a(m) - a(m - 1) Then
Else
End if
Loop
Label1.Caption="相邻两个元素的最大差值是" + Str(a(j) - a(i))
上述程序段两个方框处的语句分别为（ ）
A、① i = m ② j = m B、① i = m ② j = m - 1 C、① i = m + 1 ② j = m – 1 D、① i = m + 1 ② j = m -
18、【加试题】有如下VB程序段：
flag = True : i = 1
Do While i <= 6
x = Int(Rnd * 100) + 1
If flag Or x >50 Then
a(i)=x
flag = Not flag
i = i + 1
End if
Loop
执行该程序段后，在下列选项中，a（1）～a（6）各元素值不可能的是（ ）
A、52，95，46，74，77，83 B、50，55，46，70，21，97 C、62，78，57，61，69，50 D、31，54，48，72，50，82 -
19、【加试题】一副未经压缩的1100×1024像素的BMP图像文件，其存储容量约为1.07MB，则该图像每个像素色彩编码的位数为（ ）A、4 B、8 C、16 D、24
-
20、使用Flash软件制作动画，将库中“停止”按钮元件应用于“Load”场景，其中该按钮元件的部分编辑界面如图所示。下列说法正确的是（ ）
A、“停止”按钮元件“指针经过”帧中实例的宽高比被锁定，则该实例的大小不能被修改 B、将“停止”按钮元件“文字”图层锁定后，不能对该图层“点击”帧执行“删除帧”操作 C、修改“停止”按钮元件“背景”图层“弹起”帧中的内容，“Load”场景中该按钮实例随之变化 D、测试影片，鼠标移动到“停止”按钮上时，该按钮外观会发生变化