相关试卷
-
1、某算法的流程图如图所示,执行这部分流程图,若输入m的值为36,n的值为48,则输出的结果为( )
A、6 B、8 C、12 D、36 -
2、小敏用密码登录支付宝的部分流程图如图所示,当他输入密码时第一次错误,第二次尝试才密码正确,登录成功,则登录过程的执行流程是( )
A、①②③④⑤ B、①②③④⑥⑦ C、①②③④⑥②③④⑤ D、①②③④⑤⑦②③④⑤ -
3、用算法解决问题的过程中,首先应该做的是( )A、设计算法 B、描述算法 C、抽象与建模 D、调试运行
-
4、使用UltraEdit软件查看内码的部分界面如下图,下列说法正确的是( )
A、图中字符的内码共占14位 B、由图可知,小写字母“h”的内码用十进制表示为80 C、小写字母“a”的内码用二进制表示为01100001 D、“!”的内码用十六进制表示为20 21 -
5、下列字符中, ASCII码值最小的是( )A、K B、e C、y D、9
-
6、十六进制40是二进制10的多少倍( )A、4 B、10 C、32 D、40
-
7、算式(1010)2+(2)10+(2)10的值是( )A、(1100)2 B、(1110)2 C、(1111)2 D、(1011)2
-
8、下列关于二进制的说法,不正确的是( )A、二进制的标识为B B、二进制有两个基本数码:0、1 C、二进制采用逢二进一的进位规则 D、二进制运算式11+1=110
-
9、下列有关数据采集和数字化的描述,正确的是( )A、数据采集必须使用的设备是传感器 B、数据采集后一定要用计算机才能处理 C、数字化工具可将模拟信号可以转换为数字信号,反之则不行 D、在信息技术中,数字信号表示的数据指能被计算机存储和处理的二进制数据
-
10、互联网、移动网络、物联网等每天都产生大量数据,大数据技术应运而生。以当前广泛应用的监控视频为例,某次交通事故视频画面,有效的部分可能仅仅只需要几秒,“提纯”大数据,是人们一直努力的目标。这体现了大数据以下哪个特征?( )A、数据规模大 B、处理速度快 C、数据类型多 D、价值密度低
-
11、“新冠疫情”期间,使用如右图“行程卡”可查询本人前14天内到达或途经的地市信息,可对到访地作提醒作用。下列说法不正确的是( )
A、行程路线是客观事实,“行程卡”一旦生成将不会改变 B、“行程卡” 是对行程路线的相关数据的一种表示形式 C、行程路线的相关数据也可以用其他形式来表示 D、人们在利用数据的同时,自身的行为也在产生数据 -
12、由古至今,数据的记录形式多样化,下列说法不正确的是( )A、远古“结绳记事” 中的大结小结的数量是数据 B、古人刻在泥板或者石器的图案是数据 C、发掘于汉墓中的竹简、帛书是数据 D、现在火车票上的身份证号码是数据
-
13、某影厅共12排,每排10座。座位编号以排号+座号来命名,如第10排3座,编号命名为103。该影厅的最佳观影区为方框内的座位,即第5排3座~第10排8座的矩形位置。0表示该座位可选,非0表示已售(1表示系统推荐,2表示手工选择) 座位推荐算法:
1)只推荐最佳观影区的座位,从前往后,优先选择最中间的位置,若找到最中间位置,则推荐,否则继续寻找下一排,以此类推;
2)购票数为1时,推荐单个靠中间的位置,大于1时,只推荐连续的座位;
3)若在最佳观影区内未找到可以推荐的座位时,系统将提示手工选择。编写VB程序,模拟电影院选座。在文本框Text1中输入购票数,单击“选座”按钮Command1,在标签Labe12中显示机选座位。程序运行界面如图所示。
(1)、该影厅空座情况不变如上图所示,若购票数由2改为1,则推荐的座位编号为。(2)、实现上述功能的VB程序如下,请在划线处填写合适的代码。ConstC=10:ConstR=12 '每排10座,共12排
Dim zw(1 To C * R) As Integer, kzw(1 To C * R) As Integer '座位,空座位
Private Sub Form_ Load ()
'读取影厅座位数据存入数组zw,并将座位信息显示在列表框list1中,代码略
End Sub
Private Sub Command1_Click ()
Dim i As Integer, j As Integer, k As Integer
Dim x As Integer, min As Integer, start As Integer
Dim m As Integer, n As Integer, ans As String
m = Val (Text1.Text) '购票数,确保数值在座位数以内
n=0 '空座位的个数
For i=5 To 10 '统计最佳观影区中的空座位编号
For j=3 To 8
If zw((i-1)*C+j)= 0 Then
n=n+1
kzw(n) =
End If
Next j
Next i
min = C: start=0: k=1
Do While k+m-1<= n
If kzw(k) + m-1= kzw(k +m- 1) Then
x=Abs(C\2-(kzw(k)+kzw(k+m-1))\2 Mod C)
If x < min Then
min=x
start = k '记录满足座位条件的起始空位号
If min=0 Then Exit Do 'Exit Do表示退出循环
End If
End If
Loop
ans =””
If start = 0 Then
ans = "未能推荐座位,请手工选座"
Else
For i = kzw(start) To
'CStr函数把表达式转换为字符串,不产生前置空格
ans = ans + "第"+ CStr(i \C+ 1) +"排"+ CStr(i ModC) +"座"
Next i
End If
Label2.Caption = ans
End Sub
-
14、某校将举行“希望杯”欢乐四项赛,比赛项目有跳绳、颠球、套圈、飞镖四项。团体赛规则:每班由2名选手参加;每名选手参赛项目不限;每项每班由1名选手参赛;团体成绩为4项得分的总和。根据团体赛规则,为推选出最优组合参赛,班级制定了如下推荐办法:个人总分前5名入围,在入围的选手中依据最高单项得分之和推选两位选手组队参赛(若有多组符合要求,则选择编号靠前的选手组队)。
编写VB程序,实现选手推荐功能:单击“入围”按钮Command1后,将入围选手名单及成绩按总分降序显示在列表框List1中,然后单击“推荐”按钮Command2,在标签Label1中显示推荐结果,程序运行界面如图所示。
(1)、要使窗体Form1标题显示“比赛选手推荐”,则需修改该窗体的属性。(单选,填字母:A . Font /B . Caption /C.BackColor)(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Constrs=30 '初赛人数
Dim ts(rs) As Integer, dq(rs) As Integer, tq (rs) As Integer, fb(rs) As Integer
Dim xm(rs) As String, zf(rs) As Integer, bh(rs) As Integer
Dim n As Integer
Private Sub Command1_Click ()
Dim i As Integer, j As Integer, k As Integer, t As Integer
'读取选手姓名及四项比赛成绩,依次存入数组xm、ts、dq、tq、 fb,代码略
For i=1 To rs
zf(i) = ts(i) + dq(i) + tq(i) + fb(i)
bh(i) = i
Next i
For i=1 To rs-1
k=i
For j = i+1To rs
If
Then k=jNext j
If k<>i Then t=bh(i):bh(i)=bh(k):bh(k)=t
If i > 5 And zf(bh(i)) < zf(bh(i - 1)) Then
n=
Exit For 'Exit For表示退出循环
End If
Next i
'按要求将入围选手显示在列表框List1中,代码略
End Sub
Private Sub Command2_ Click()
Dim smax As Integer, s As Integer, i As Integer, j As Integer
Dim xs1 As String, xs2 As String
smax = 0
For i=1Ton- 1
For j=i+ 1To n
s = sum(bh(i), bh(j))
If s > smax Then
xs1 = xm(bh(i))
xs2 = xm(bh(j))
End If
Next j
Next i
Label1.Caption=xs1+""+xs2
End Sub
Function sum(x As Integer, y As Integer) As Integer
sum=0
If ts(x) > ts(y) Then sum=sum+ts(x) Else sum=sum+ts(y)
If dq(x) > dq(y) Then sum = sum + dq(x) Else sum= sum + dq(y)
If tq(x) > tq(y) Then sum = sum + tq(x) Else sum= sum + tq(y)
If fb(x) > fb(y) Then sum = sum + fb(x) Else sum = sum + fb(y)
End Function
(3)、程序中加框处代码有错,请改正。 -
15、使用Flash软件创作主题为“中国梦”的多媒体作品,部分编辑界面如图a所示。
(1)、创作多媒体作品需要进行需求分析。下列属于创作需求分析的是(多选,填字母:A .了解作品的社会效益、经济效益/B .确定作品的结构类型/C .确定获取原始素材的方式/D .考虑作品的脚本编写/E .确定作品的发布方式)。(2)、“鸽子”图层第1帧的内容由库中“鸽子”元件生成。该元件的编辑界面如图b所示,该元件可由(单选,填字母:A .鸽子.gif /B .鸽子. jpg)文件导入库中直接生成,该元件中动画的类型是(单选,填字母:A .逐帧动画/B .补间动画)。(3)、“按钮”图层的第45帧添加了动作脚本命令“stop();”,声音的同步属性为事件。测试影片时,动画播放到第45帧自动停止,单击“播放”按钮,影片停止当前声音的播放,跳转到“中国梦”场景第1帧开始播放,则该按钮实例上添加的动作脚本是 (多选,填字母)A、on(release) {stopAl1Sounds () ;gotoAndPlay("中国梦",1);} B、on (release) {stopAllSounds () ; gotoAndPlay(1);} C、on (release) {stopAllSounds (45) ;gotoAndP1ay("中国梦",1);} D、on (release) {stopAllSounds (45) ; gotoAndP1ay(1) ;} E、on (release) {stopAllSounds () ;p1ay();}(4)、测试场景时,“天安门”图层内容在播放完第25帧后消失,为了使该图层第25帧内容延续到第45帧,应进行的操作是。 -
16、收集某校高一年级3个班趣味运动会相关数据,并用Excel软件进行数据处理,部分界面如图a所示。
请回答下列问题:
(1)、区域H4:H123的数据是通过公式计算得到的,在H4单元格中输入公式。再使用自动填充功能完成区域H5:H123的计算。(按照名次来计算得分,要求第1名得50分、第2名得49分……第50名得1分、其他名次得0分.提示:=IF(A4<8,8-A4, 0)表示A4单元格的值小于8时,返回8-A4的值,否则返回0)
(2)、对区域A2:I123进行相关数据分析,下列说法正确的是 。(多选,填字母)A、修改G4单元格的数据,I4单元格的值会随之改变 B、为了将总得分最高的男生数据显示在当前工作表第4行,可选择数据区域A4:I123,以“列B”为主要关键字按字母升序、“列I”为次要关键字按降序进行排序 C、选手编号规则为: S+两位班级编号+两位班内学号。先按“列I”降序排序,再对“选手编号”进行筛选,条件为包含“01”,则显示在最前面的是高一(1)班总得分最高的学生数据 D、选手编号规则为: S+两位班级编号+两位班内学号。为了显示高一(3) 班总得分最高的3位学生数据,可先对“选手编号”进行筛选,条件为开头是“S03”,再对“总得分”进行筛选,选择“10个最大的值”并显示最大的3项(3)、对图a中的数据进行相关统计,结果放在新工作表中,如图b所示。根据图b中的数据制作的图表如图c所示。创建该图表的数据区域是 。
-
17、某对分查找算法的VB程序段如下:
For i=1 To 15
a(i) = i
Next i
key = Int (Rnd * 20)
i = 1:j=15:n=0
Do While i<=j
m=(i+j+1)\2
If a(m)< key Then i=m +1 Else j=m-1
n=n+1
Loop
执行该程序段后,变量n的值可能是( )
A、1 B、2 C、3 D、4 -
18、有如下VB程序段:
k=0:r=""
For i=1 To Len(s)
If b(k) = Mid(s, i,1) Then
k=k-1
Else
k=k+1
b(k) = Mid(s, i, 1)
End If
Next i
For i=1 To k
r=r+b(i)
Next i
数组元素b(0)到b(10)的初始值为“”,若变量s的值为“abbaddcab”,执行该程序段后,变量r的值是( )
A、”abdc” B、"aacab” C、"c" D、"cab" -
19、有如下VB程序段:
count = 0: n=7: i= 1
Do While i<=n
If a(i)> a(i+1)Then
count = count + 1
t = a(i): a(i) = a(i + 1): a(i+1) =t
End If
If i=n Then i=0:n=n-1
i=i+1
Loop
Text1.Text = Str (count)
数组元素a(1)到a(8)的值依次是“15,2,1,17,19,14,25,26”,执行该程序段后,文本框Text1中显示的是( )
A、4 B、5 C、6 D、7 -
20、将正整数n分解为连续正整数之和(如正整数9分解为2+3+4、4+5两种)。统计分解方法共有几种的VB程序段如下:
ans=0
n = Va1 (Text1. Text)
For i=1 To n\2
t=n:x=i
Do While t>0
Loop
Next i
Text2.Text = Str (ans)
方框中的代码由以下三部分组成:
①If t=0 Then ans=ans+1 ②t=t-x③x=x+1
下列选项中,代码顺序正确的是( )
A、③①② B、②①③ C、①③② D、①②③