相关试卷
-
1、某同学利用百度搜索得到的部分界面如下图所示。下列说法错误的是( )
A、该检索方式是“搜索引擎” B、该同学正在搜索的是“新型冠状病毒”的相关信息 C、用“百度”搜索到有关新型冠状病毒的信息都是可信的 D、百度搜索采用全文检索技术 -
2、学校餐厅实施套餐预订制度来提升窗口打菜效率,缩短学生排队时间。每周学校都会提供“ABCD”四种套餐供学生选择,然后按每种套餐的预定数量安排特定的点餐窗口(混合套餐窗口尽量少,一人只能预订一份套餐)。
安排方法如下:先计算出每个窗口的平均售卖套餐数量num=套餐总需求量(n)\窗口数(k),然后按平均套餐数量num顺次安排“ABCD"四种套餐(首轮每个窗口出售一种套餐,数量为num),当某种套餐需求数量或安排后剩余需求数量小于套餐平均数num时,待首轮安排结束后安排在混合窗口。如第一轮安排单-套餐窗口编号为1到b1,那么混合窗口编号为b1+1到k,为了均衡混合窗口的套餐种数,混合窗口从窗口编号k到b1+1按各类套餐剩余需求数由大到小安排一轮(安排k-b1种套餐),然后从窗口编号b1+1到k按各套餐剩余数量由大到小顺次安排,当窗口安排套餐数量达到num时,剩余套餐换至下一窗口继续安排,最后一个窗口(k窗口)人数允许大于num。
编写VB程序,实现窗口套餐分配功能:点击“载人口点某窗口安排套餐预订信息”按钮Command1后,将预订套餐总人数显示在文本框Text1中,各套餐预订人数显示在列表框List1中,在文本框Text2中输入点菜窗口数,然后点击“窗口安排方案”按钮Command2,在列表框List2中显示点菜窗口安排结果。程序运行界面如图所示。
(1)、“ABCD”套餐预订人数如程序运行界面所示,当窗口数设置为“8”时,最后一个窗口(8号窗口)安排的套餐为。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Dim a(1 To4) As Integer'顺次存储“ABCD"四种套餐预订人数
Dim b(1 To 20) As Integer'存储各窗口安排套餐数量
Dim c(1 To 20) As String '存储窗口套餐方案
Dim n As Integer
Private Sub Command1_Click()
'载人套餐预订信息,预订人数存人n,各套餐预订数量存人a数组, 代码略
End Sub
Private Sub Command2_ Click()
Dim k As Integer,num As Integer, b1 As Integer
Dim i As Integer,j As Integer, t As Integer, t1 As Integer
Dims As String
Dim d(1 To 4) As Integer
s = "ABCD"
k = Text2.Text
num = n\k '计算各窗口平均排队人数
b1= 1
For i=1 To 4
Do While a(i):>=num
c(b1) = Mid(s, i, 1)
b(b1) = num
a(i) = a(i)-num
b1=b1+1
Loop
Next i
b1=b1-1
For i = 1 To 4
For j=i+1 To 4
If a(i) < a(j) Then
t=a(i):a(i)=a(j):a(j)=t
t=d(i):d(i)=d(j):d(j)=t
End If
Next j
Next i
t=k
For i=1 To k-b1 '按各类套餐剩余需求数从大到小安排一轮
b(t) = a(i)
c(t) = Mid(s, d(i), 1)
a(i) = 0
t=t-1
Next i
t =i
For i=b1 To k
Do While b(i)<num Or i=k And num*(k-1)+b(k)<>n
b(i) = b(i) 十a(t)
a(t) = 0
t=t+1
Loop
If b(i)>num And i<>k Then
t=t-1
b(i) = num
End If
Next i
List2.AddItem "套餐数量”
For i =1 To k
List2.AddItem c(i) + ""+ Str(b(i))
Next i
End Sub
-
3、在一个整数序列中找第k大的数,若有相同的整数,则位置靠前的整数的名次靠前。如有整数序列为“10,13,12,13,15”,则第1大的数为15,在第5个位置,第2大的数为13,在第2个位置,第3大的数还是13,在第4个位置,第4大的数是12,在第3个位置,第5大的数是10,在第1个位置。
编写一个VB程序,实现如下功能:程序启动时产生n个1~20之间的随机整数,在文本框
Text2中输人整数k(k≤n),单击“查找"按钮Command1后,在标签Label1上显示第k大的数及位置。程序运行界面如图所示。
(1)、下列对象不具有Caption属性的是(单选,填字母:A .Command1 /B .Form1 / C .Text1 /D .Label1)(2)、实现上述功能的VB程序如下,请在划线处填入合适代码。Const n= 10
Dima(1 To n) As Integer
Private Sub Form_ Load( )
'本过程产生n个1~20之间的随机整数存数组a中,并在文本框Text1中显示,代码略
End Sub
Private Sub Command1_Click()
Dimi As Integer,key As Integer,c As Integer,k As Integer
Dim b(1 To 20) As Integer
For i= 1 To n
b(a(i)) = b(a(i)) +1
Next i
i= 20
Do While i> 1 And b(i) < k
i=i-1
Loop
Label3.Caption="第"+Str(k)+"大的数是"+Str( key)
c=0
For i=1 To n
If a(i) = key Then c= c+1
If c=
Then Exit ForNext i
Label3.Caption =Label3.Caption + ",在第"+Str(i)+"位置"
End Sub
(3)、程序代码中的加框处代码有误,请改正。 -
4、使用Flash软件制作“鱼牛的故事”动画:
(1)、创作多媒体作品需要进行需求分析和规划设计。下列属于创作需求分析的是(多选,填字母:A .了解用户的计算机应用水平/B .考虑作品创作及运行需要的硬件设施/C .确定获取原始素材的方式/D .设计作品的主要界面/E .确定作品的发布方式)。(2)、测试该场景时,“鱼”图层内容在播放完第15帧后消失,为了使该图层延续到45帧,下列操作可行的是 。(多选题,填字母)A、选中“鱼”图层第16帧执行“清除关键帧”操作 B、选中“鱼”图层第45帧执行“插入关键帧”操作 C、删除“鱼”图层第16帧 D、选中“鱼”图层第15帧执行“复制帧”操作,在第45帧执行“粘贴帧”操作 E、选中“鱼”图层第15帧执行“复制帧”操作,在第16帧执行“粘贴帧”操作(3)、“鱼”图层第1帧中的对象是完全透明的“鱼儿”元件实例。测试当前场景时,第1帧到15帧没有实现“鱼儿”元件实例由完全透明到完全显示的渐变动画效果,要实现该效果,则在“鱼”图层第1帧中将“鱼儿”实例的颜色Alpha值设为%。(4)、删除声音图层的第20帧到第45帧,对动画整体音效 (填:有/无)影响。(5)、单击“replay”按钮,跳转到“第一幕”场景第1帧并开始播放,该按钮的动作脚本命令是。 -
5、疫情期间学生在家进行网课学习,张老师对自己所带的两个班某节技术课的听课情况进行了统计分析,如下图a所示,请回答下列问题:
(1)、单元格K4统计的是0301班在线时长率低于60%的学生人数,是使用COUNTIFS时计算得到的,并对K4:L5进行自动填充,K4单元格里的公式是。(提示:COUNTIFS函数用于计算多个区域中满足给定条件的单元格的个数。例如:= COUNTIFS(F4:F83,"<60",B4: B83,J5)表示求F4: F83区域内所选内容小于“60”且B4:B83区域内所选内容为“0302”的单元格数据,F列、G列均为百分数。)
(2)、将工作表区域A3:H83的数据复制到新工作表,在新工作表中对“班级”和“总收看时长”进行筛选,如图b和图c所示,符合条件的筛选结果只有一项,原因是。
(3)、根据图a数据,制作图d,则该图表的数据源是。
-
6、某对分查找算法的VB程序段如下:
Key = Val(Text1.Text)
i=1:j=10
Do While i<= j
m= (i+j)\ 2
s= s+Str(a(m)\ Key)
If a(m) > Key Then j= m- 1 Else i=m+1
Loop
Text2.Text = s
数组元素a(1)到a( 10)的值依次为“2,3,5,8,9,10,13,17,19,20”。在文本框Text1中输入待查找的整数,执行该程序段,则文本框Text2中显示的内容可能的是( )
A、2 1 1 B、0 1 1 1 C、0 0 1 0 D、0 2 0 1 -
7、有如下VB程序段:
a(1)=4:a(2)=5:a(3)=3:a(4)=1:a(5)=1:a(6)=5
s =0
For i=1 To 5
If a (i)<a(i+1) Then
t = a(i):a(i) =a(i + 1):a(i+1)=t
End If
s=s+a(i+ 1)
Next i
执行该程序段后,s的值是( )
A、10 B、11 C、18 D、19 -
8、在字符串s中找连续最长不下降数字字符串长度max,如字符串“318714101223411624”连续最长不下降数字字符串为“012234”,其长度max为6,实现该功能的VB程序段如下:
s = "318714101223411624"
c=Mid(s, 1, 1):i=1:max=0
For j=2 To Len(s)
If t> c Or j = Len(s) Then
End If
Next j
上述程序段中方框处可选语句如下:
①i=j
②t=c
③c = Mid(s, j, 1)
④If j-i>max Then max=j-i
则(1)(2)(3)(4)处语句依次为( )
A、③②④① B、②④③① C、②③④① D、③①④② -
9、有如下VB程序段:
Dims As String, c As String, st As String
Dim n As Integer, i As Integer
s ="20zj20sx7":n=0:st=""
For i=1 To Len(s)
c=Mid(s,i,1)
If c>= "a" And c<= "z" Then
st=Chr(Asc("a") *2+25-Asc(c))+st
Else
n=n*10+ Val(c)
End If
Next i
st =st+str(n)
执行该程序段后,变量st的值是( )
A、chqa 20207 B、cgpz 47 C、zpgc 20207 D、zjsx 47 -
10、某算法的部分流程图如图所示,执行这部分流程,若输人n值为35,k值为3,则输出c的值为( )
A、35 B、62 C、90 D、93 -
11、一个未经压缩的音频文件,相关参数及选取状态如图所示。
则该文件执行裁剪命令后,该音频文件的存储容量约为( )
A、258KB B、602KB C、861KB D、881KB -
12、用Photoshop软件制作“绍兴旅游”作品,如图所示,下列说法正确的是( )
A、“如画绍兴"图层设置了滤镜效果 B、调换“如画绍兴”和“人文景观"图层的次序,会影响图像效果 C、“如画绍兴”图层创建了变形文字 D、选中“绍”字,执行修改字号命令仅将“绍”字变大 -
13、下列关于数制的说法,正确的是( )A、二进制数1010011转换为十六进制数是A3 B、二进制数110中的末位数码0对应的权值是0 C、ASCII码由128个代码组成,码值范围为1~128 D、若二进制数1101去掉末位数码1,则新数是原数的1\2
-
14、使用Access软件设计一个数据表,存储如图所示的文章记录数据。
文章ID
文章标题
文章内容
发布时间
审核
1
扬帆起航逐梦高考
(略)
2020- 07-31
待审核
2
慧心尔雅待展芳华
(略)
2020- 08-01
通过
3
选择自己适合的路
(略)
2020-08-02
未通过
……
……
……
……
……
注:因篇幅因素,表中省略了文章内容,该字段允许存储学生日常习作(5000字以内)。
下列表格设计合理的是( )
A、
B、
C、
D、
-
15、下列有关网页与浏览器的说法,正确的是( )A、在E浏览器中,以“网页,全部(*,Htm,*.html)”类型保存网页,可以同时保存视频 B、用HTTP语言可以描述网页中的文本、图像和超链接等元素 C、浏览器的“收藏夹”中保存了所收藏网页的URL D、访问相同的网址,得到的网页内容一定相同
-
16、下列有关信息与信息处理的说法,不正确的是( )A、“有一千个读者就有一千个哈姆雷特”,说明了信息可以被加工处理 B、扫描商品条码获取商品信息,说明信息可以脱离载体而存在 C、二维码过一段时间会失效,说明信息具有时效性 D、刷脸支付属于人工智能应用
-
17、使用Flash软件制作主题为“梦想”的多媒体作品。请回答下列问题:(1)、下列属于创作需求分析阶段的是(多选,填字母: A .确定作品的主题思想为“追逐梦想"/B .确定作品面向中学生演示播放/C .将作品划分为load、main、end三个主要界面/D .确定作品的结构类型为演示型/E.根据主题思想和内容,制订脚本大纲)。(2)、如图a所示,“文字”图层第29帧到第60帧实现了“追逐梦想”四个字依次出现在舞台上的动画效果,该动画类型为。(单选,填字母:A .逐帧动画/B .动画补间动画/C .形状补间动画)
(3)、“纸飞机2”图层第21-45帧实现了纸飞机的动画效果,要实现“纸飞机2”图层的动画从第1.5秒时出现,并将第45帧的内容持续到动画结束,正确的操作是。(4)、“音乐”图层属性面板的部分界面如图b所示,“按钮”图层最后1帧中的动作脚本为stop();测试场景时,动画中音乐的播放时长约为秒。
(5)、测试影片时,单击“replay”按钮,停止声音的播放,并跳转到该场景的第1帧重新开始播放,则该按钮上应添加的动作脚本为on(release){}。 -
18、小张收集了2017-2019 年浙江省各地区GDP及常住人口相关数据,并使用Excel软件进行处理,如图a所示。

请回答下列问题:
(1)、如图a所示,小张为实现2017-2019各地市人均GDP的计算,通过F3单元格中的公式,对F3:H13进行自动填充,但发现G3:H13的计算结果不符合要求。若耍正确计算G,H列的数据,可将F3单元格中的公式修改为 , 再进行自动填充。(2)、根据图a中的数据制作了图表,如图b所示,创建该图表的数据区域是。
(3)、要找出浙江包含“州”的地区中“2019人均GDP"最小的地区(若存在符合条件的多个地区,则全部选取)。下列方法可行的是 (多选,填字母)。A、以“地区”包含“州”、“2019人均GDP”为最小1项进行筛选,然后选取筛选出的全部地区 B、以“地区”包含“州”进行筛选,再以“2019人均GDP”为关键字升序排序,选取排在最前面的地区 C、以“2019人均GDP”为主要关键字、“地区 ”为次要关键字,均按升序排序,选取排任最前面的地区 D、以“2019人均GDP”为关键字升序排序,再以“地区”包含“州”进行筛选,选取排在最前面的地区 -
19、某对分查找算法的VB程序段如下:
'数组元素f(1)到f(10)赋初值为0,代码略
key = Val (Text1.Text)
i = 1:j=10
Do While i<=j
m=(i+j)\2
f(m)= 1
If a(m) >= Key Then j =m-1 Else i=m+1
Loop
整数数组元素a(1)到a(10)为升序序列,在文本框Text1中输入待查找数,执行该程序段后,下列选项中,f(1)到f(10)各元素值不可能的是( )
A、1,1,0,0,1,0,0,0, 0,0 B、0,0,0,0,1,0,0,1,0,0 C、0,1,1,1,1,0,0,0,0,0 D、0,0,0,0, 1,1,1,1,0,0 -
20、有如下VB程序段:
For i=1 To 2
For j=6 To i+1 Step -1
If a(j) Mod 10 > a(i) Mod 10 Then
t=a(j):a(j)=a(j-1):a(j-1)=t
End If
Next j
Next i
执行上述程序段后,下列选项中,a(1)到 a(6)各元素值不可能的是( )
A、74,83,41,1,70,10 B、79,46,4,64,53,71 C、16,75,35,60,54,91 D、49,56,19,25,82,32