浙江省湖州、衢州、丽水三地市2020届高三上学期信息技术11月教学质量检测试卷

资源下载
  1. 二一教育资源

浙江省湖州、衢州、丽水三地市2020届高三上学期信息技术11月教学质量检测试卷

资源简介

浙江省湖州、衢州、丽水三地市2020届高三上学期信息技术11月教学质量检测试卷
一、选择题(本大题共12小题;每小题2分,共24分。)
1.(2019·湖州模拟)下列有关信息与信息安全的说法,正确的是(  )
A.书本不是信息,书本上的文字是信息
B.图像、声音、动画、视频是信息的表达技术
C.不联网的计算机不会感染病毒
D.对数据进行定期备份是一种有效的信息安全防护措施
【答案】D
【知识点】信息及其特征;信息系统安全防护
【解析】【解答】选项A:书本不是信息,书上的文字也不是信息,它们都是信息的载体,文字表达的知识才是信息,本项错。选项B: 图像、声音、动画、视频是信息表达方式,而电视、计算机、报刊杂志才是信息的表达技术。本项错。选项C:病毒可以通过软盘、U盘、光盘等可移动设备进行传播并不一定依靠网络传播,本项错。选项D:信息安全采取的措施很多,对数据进行定期备份,到时恢复也是安全措施之一,本项对。故答案选D。
【分析】本题考查的是信息和载体、信息的表达技术和形式以及信息安全防护。信息是事物运动的状态和方式,是事物内部结构和外部联系的状态和方式,载体是指能够运送其他物体或传递信息和能量的物体。同一种信息内容可以采用不同的表达方式,以满足信息接收者的实际需要。常用的信息表达技术有:广播电视、报刊书籍、多媒体技术和网络技术等,其中多媒体技术和网络技术是信息社会中比较重要的信息表达技术。信息安全主要包括以下五方面的内容,即需保证信息的保密性、真实性、完整性、未授权拷贝和所寄生系统的安全性。
2.(2019·湖州模拟)下列有关网页和电子邮件的说法,正确的是(  )
A.记事本程序可以编辑并解释执行HTML代码
B.执行“添加到收藏夹”操作,实际上保存了网页的URL
C.通过网页收发电子邮件不需要使用SMTP和POP3协议
D.只有知道收件人的电子邮件地址和密码才能发送电子邮件
【答案】B
【知识点】电子邮件,电子公告板等信息交流方式
【解析】【解答】选项A:记事本可以编辑HTML代码,但不能解释并执行HTML代码,浏览器才行。选项B:将网址添加到“收藏夹”实际上只是保存了网页的网址,本项对。选项C:收发电子邮件分为两步,第一步为发送邮件,使用SMTP协议,第二步为收邮件,使用POP3协议。选项D:只要知道收件人的电子邮件地址而不需要知道收件人的密码就可以发送电子邮件。故答案选B。
【分析】本题考查的是网页的编辑及收发电子邮件的知识。HTML语言又称超文本标记语言,其实质为一种文本文件可以使用记事本、Word等文字处理软件编辑,但浏览时需使用浏览器浏览。收发电子邮件分为两步,第一步为发送邮件,使用SMTP协议,第二步为收邮件,使用POP3协议。
3.(2019·湖州模拟)下列有关 Access数据表的说法,正确的是(  )
A.数据表中的字段名称及数据类型只能在设计视图中修改
B.数据类型为“自动编号”的字段值一定有序
C.数据表中某字段数据类型为“是/否”,可以在该字段输入“是”
D.数据表中的记录可以通过数据库应用系统进行添加和删除
【答案】D
【知识点】数据表、字段、记录的概念;数据表、字段、记录的编辑
【解析】【解答】选项A:在Access 2007版本后,在数据表视图下也可以修改字段名称及类型。选项B:数据类型为”自动编号“有两种类型,一种为递增,另一种为随机,如为随机则其字段是无序的。选项C: 数据表中某字段数据类型为“是/否” ,则只能在该字段下打对勾或去掉对勾。选项D:数据库应用系统就是基于数据库开发的应用系统,通过数据库应用系统可以实现对数据表中数据的查询、增加、删除等操作。故答案选D。
【分析】本题考查的是数据表视图方式及数据表的字段类型。数据表的视图方式共有四种:设计视图、数据表视图、数据透视表视图和数据透视图视图。1、在设计视图中可以对表格的结构进行设置,比如有哪些字段,每个字段的类型等。2、在数据表视图中可能浏览、修改、增减每条记录的内容, 是最常见也是系统默认的视图。3、在数据透视表视图和数据透视图视图中,我们可以根据数据字段,设置交叉统计表格的行字段、列字段等,将数据以分类的方式显示成表格或统计图。Access允许九种数据类型:文本、备注、数值、日期/时间、货币、自动编号、是/否、OLE对象、超级链接、查询向导。在表的设计视图中,每一个字段都有设计类型。
4.(2019·湖州模拟)使用UltraEdit软件观察字符“C9+1高校排名!”的内码,部分界面如图所示。
则下列说法正确的是(  )
A.该字符串中只有3个ASCII码字符
B.存储该字符串共需要13个字节
C.字符“10”的内码是40H
D.字符“名”的二进制编码是11000011 11111011
【答案】D
【知识点】信息的编码;进制及数制转换
【解析】【解答】选项A:在该字符串中共有”9、+、1、!“四个ASCII码字符,本项错。选项B:由图知,该字符串共由28个十六进制表示,故需要14个字节存储该字符串,本项错。选项C:由字符”9“的内码”39H“知字符”10“的内码为“3AH”,因为为十六进制表示,故9后多1不能进位应使用字符“A”,本项错。选项D:由字符名的内码“C3 FB”知其二进制编码为“1100 0011 1111 1011”。故答案选D。
【分析】本题考查的是汉字和英文字母、字符的内码。在内存中一个汉字由2个字节、4位十六进制数、16位二进制数表示,一个英文字母由1个字节、2位十六进制数、8位二进制数表示。另外对于一个十六进制数逢9+1并不进1,逢15+1才进1。
5.(2019·湖州模拟)使用Goldwave软件编辑某音频文件,部分界面如图所示。
下列说法正确的是(  )
A.执行“静音”操作,音频时长将变成20秒
B.执行“删除”操作并按原参数保存,音频文件存储容量不变
C.执行“插入静音”操作添加10秒静音后,音频第10秒到第20秒静音
D.将音频另存时选择双声道,其他参数不变,则存储容量变成原来的2倍
【答案】C
【知识点】声音素材的基本处理;声音、图像、视频编码
【解析】【解答】选项A:执行“静音”后第10秒到第30秒变为静音,但并没有删除该段音频,时长仍为40秒,本项错。选项B: 执行“删除”操作并按原参数保存, 由于时长由原40秒变为了20秒,故其存储容量减少一半,故本项错。选项C:由图知本音频选中的为第10秒到第30秒,故执行“插入静音”后第10秒到第30秒变为被向后移动静音,第10秒到第20秒变为静音,本项对。选项D: 将音频另存时选择双声道,其他参数不变, 右声道没有任何参数,故其存储容量不变,本项错。故答案选C。
【分析】本题考查的是"静音”、“插入静音”及“删除”操作。在进行这些操作前先应进行设标操作,对于“静音”则是将选中部分设为静音,对于“插入静音”则在选中部分前插入静音,对于“删除”,如为单声道则将选中部分删除,如为双声道,如只选中一个声道则相当于静音操作,如选中两个声道则时长减少,删除选中部分。
6.(2019·湖州模拟)一段时长为10秒、1024×768像素、256级灰度、总帧数为300帧的未经压缩AVI格式无声视频,其文件存储容量约为(  )
A.28.12MB B.225MB C.2.2GB D.7.03GB
【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】由视频文件的存储容量公式知该视频文件的存储容量为: 256级灰度就相当于1个点有256种颜色,可用8位二进制数(1个字节)来表示。存储容量=1024×768 ×1×300=235929600B=230400KB=225MB,故答案选B。
【分析】本题考查的是视频存储容量公式。视频文件存储容量=(水平像素×垂直像素×每个像素所需位数/8)*帧频*时长(字节),在本题中没有给出帧频,但给出了总帧数,可代替帧频*时长。
7.(2019·湖州模拟)下列VB表达式的值等于128的是(  )
A.Abs(Int(-128.3)) B.Val(Str(120)+“8”)
C.2^8\6/3 D.Mid(“3612876”,3,3)
【答案】C
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A: Abs(Int(-128.3)) =ABS(-129)=129;选项B: Val(Str(120)+“8”) =val(“120”+“8”)=val(“1208”)=1208;选项C:2^8\6/3=256\6/3=256/2=128;选项D: Mid(“3612876”,3,3) =“128”。故答案选C。
【分析】本题考查的是常用函数的功能及数值运算符的运算优先级。ABS()是求参数的绝对值,int()是求不大于参数的一个整数,尤其是负数,其值不是直接舍去小数部分而是进一后再取负数。VAL()是将字符串转为数值型。str()则是将数值型转为字符串,mid()为中取函数。而数值运算的顺序为函数、()->^->*、 /->mod 、\->+、-。
8.(2019·湖州模拟)某算法的部分流程图如图所示,下列说法正确的是(  )
A.该流程用于计算并输出1+2-3+4+…-49+50的值
B.执行该部分流程后,变量a的值为50
C.执行该部分流程后,“s←s+a”共执行25次
D.执行该部分流程后,“a<=50 ”共执行50次
【答案】C
【知识点】算法的常用表示方法;算法的控制结构
【解析】【解答】由本题的流程图可知,先将s的值赋为0,a的值赋为1,再去判断a值是否小于等于50,如果小于等于50则再去判断a值是否为奇数,如为奇数则将a值累加到变量s中,否则将a的相反数累加到s中,累加完后再将a值增1,再进行下一次的判断,直到a值大于50为止,最后输出s值。选项A:由流程图知,该题计算并输出的数学公式为1-2+3-4+……+49-50。本项错。选项B:由流程图的条件知当a小于等于50时执行循环,当a大于50时才能退出循环,故执行完该程序时a的值为51而不是50。本项错。选项C:由图可知,a的值由1变为51共执行了50次循环,在50次循环中a有25为奇数,25次为偶数,本项对。选项D:由图知当执行该部分流程后,循环了50次但执行条件判断为51次,在第51次时退出循环,故 “a<=50 ”共执行51次而不是50次。本项错。故答案选C。
【分析】本题考查的是对流程图的分析。流程图使用标准的框图符号绘制,框图一般按从上到下、从左到右的方向画,除了判断框外,程序框的符号只有一个进入点和一个退出点,而判断框则具有一个进入点和多个退出点。在分析流程图时注意流程线的数据流向。
9.(2019·湖州模拟)有如下VB程序段:
s=0
For k =3 To 1 Step-1
If k <=1 Then x=1
If k <=2 Then x=2
If k <=3 Then x=3
s=s+x
Next k
Text1. Text= Str(s)
该程序段运行后,文本框Text1中显示的内容是(  )
A.9 B.7 C.6 D.5
【答案】A
【知识点】算法的控制结构;常量、变量及变量的赋值
【解析】【解答】本题程序分析如下:
s=0 ‘将变量s的值设为0
For k =3 To 1 Step-1 ‘使用k控制循环,k的初值为3,终值1,步长为-1
If k <=1 Then x=1 ‘如果k值小于等于1时,x值为1
If k <=2 Then x=2 ‘如果k值小于等2时,x值为2
If k <=3 Then x=3 ‘如果k值小于等3时,x值为3
s=s+x ‘将x值累加到s中
Next k ‘结束循环
Text1. Text= Str(s) ‘在文本框1中输出s值
由以上程序分析知,k值为3、2、1,在循环体中依次判断k值是否小于等于1、2、3,即3次循环要依次执行,对于第三个条件语句k<=3 Then x=3在每次循环时都要执行且在条件循环的最下面,故s=3+3+3=9。故答案选A。
【分析】本题考查的是条件循环语句及条件判断语句。在本程序中使用for进行循环,for为定次循环即循环次数固定,而对于循环体内的三个条件判断语名要依次执行,在x值被多次赋值时,使用该变量要取上面离该语句最近的赋值语句。
10.(2019·湖州模拟)对n个元素的数组a进行升序排列:第一遍将最小的数移至第1个位置,将最大的数移至第n个位置;第二遍将余下元素中的最小和最大数分别移至第2个和第n-1个位置,以此类推,直到所有数组元素按升序排列。部分代码如下:
m1=1:m2=n
Do While m1< m2
For i=m2 To m1+1 Step -1
If a(i)( a(i-1)Then t= a(i): a(i)=a(i-1): a(i-1)=t
Next i

If a(i)> a(i +1). Then t= a(i): a(i)=a(i+1): a(i+1)=t
Next i
m1=m1+1
m2=m2-1
Loop
要使程序实现上述算法思想,则代码中①处的语句是(  )
A.For i=m1+1 To m2-1 B.For i =m2-2 To m1-2 Step -1
C.For i=m1+2 To m2-2 D.For i= m2-1 To m1+1 Step -1
【答案】A
【知识点】常见数据类型、数组;排序算法及程序实现
【解析】【解答】本题程序分析如下:
m1=1:m2=n ‘给两个变量m1和m2赋初值1和n,m1和m2为指示本轮数组下标最小和最大的两个变量
Do While m1< m2 ‘在m1比m2时进行循环
For i=m2 To m1+1 Step -1 ‘使用i来控制内层循环,i的初值为m2,终值为m1+1,步长为-1,用来查找本轮的最大值将移至m2位置上
If a(i)<( a(i-1)Then t= a(i): a(i)=a(i-1): a(i-1)=t ‘如果数组的一个元素的值比其前面的元素值小时则借助第三变量t交换前后两个元素的值
Next i ‘结束内层循环,本循环是将最大值移到第m2指示的位上
① ‘使用i来控制内层循环,i的初值为m1+1,终值为m2-1,步长为1,用来查找本轮的最小值并将该值放置到m1上,故本题答案应填写:for i=m1+1 to m2-1
If a(i)> a(i +1). Then t= a(i): a(i)=a(i+1): a(i+1)=t ‘如果数组的一个元素的值比其后面的元素值大时则借助第三变量t交换前后两个元素的值
Next i ‘结束内层循环
m1=m1+1 ‘将m1值增1
m2=m2-1 ‘将m2值减1
Loop ‘结束外层循环
由以上程序知,在①处为:使用i来控制内层循环,i的初值为m1+1,终值为m2-1,步长为1,用来查找本轮的最小值并将该值放置到m1上,故本题答案应填写:for i=m1+1 to m2-1。故答案选A。
【分析】本题考查的是冒泡法。在本题中使用两个冒泡法选出最大值放到m2位置上,选出最小值放置到m1上,在使用冒泡法进行排序时使用i控制外层循环,代表每次的比较轮数,j控制内层循环代表每轮比较次数,在进行一轮比较后将最大值放到数列的末尾,在经过n-1轮比较后将输入的数排成一个由小到大(或由大到小)的数列。
11.(2019·湖州模拟)有如下VB程序段:
min=100:x=0
Do While x < =16
d1=Sqr(9+(x-4)*(x-4))
d2=Sqr(36+(16-x)*(16-x))
If d1+d2x=x+0.1
Loop
Text1.Text=St(min)
该程序段运行后,文本框Text1中显示的内容是(  )
A.14 B.15 C.16.42 D.18.37
【答案】B
【知识点】算法的控制结构;常量、变量及变量的赋值
【解析】【解答】本题程序分析如下:
min=100:x=0 '给变量min的值赋为100,给变量x的值赋为0
Do While x < =16 '使用x控制循环,当x的值小于等于16时执行循环
d1=Sqr(9+(x-4)*(x-4)) '在x值小于16时计算d1值
d2=Sqr(36+(16-x)*(16-x)) '在x值小于16时计算d2值
If d1+d2x=x+0.1 '将x值增0.1
Loop '结束条件判断
Text1.Text=St(min) '在文本框1中输出最小值变量min的值
由以上程序分析知,x的值由0变为16,每次的增量为0.1,而d1的值为 Sqr(9+(x-4)*(x-4)) ,d2的值为 Sqr(36+(16-x)*(16-x)) 。而程序是求d1和d2之和的最小值。由题义可知,当x=10.1时两者之和最小,此时d1+d2=15。故答案选B。
【分析】本题考查的是使用数学公式求最小值。对于该类题需知使数学公式求极值的方法或使用程序运一次。
12.(2019·湖州模拟)给定含有n个正整数元素的数组a,将其分成连续的k(1a(1)=1:a(2)=2:a(3)=3:a(4)=3:a(5)=1
n=5:k=3
L=3:R=10 ‘L值可以为数组元素最大值,R可以为数组所有元素和
Do While L+1m=(L+R)\2
t=0:s=0
For i=1 To n
If t+a(i)>=m Then
s=s+1
t =a(i)
Else
t =t+a(i)
End If
Next i
If t>0 then s=s+1
If s<=k Then① Else ②
Loop
Label1.Caption=“最小值为”&Str(L)
要使程序实现上述算法思想,则代码中①②处应为(  )
A.①R=m ②L=m B.①L=m ②R=m
C.①R=m+1 ②L=m-1 D.①L=m+1 ②R=m-1
【答案】A
【知识点】查找算法及程序实现
【解析】【解答】本题程序分析如下:
a(1)=1:a(2)=2:a(3)=3:a(4)=3:a(5)=1 ‘
n=5:k=3 ‘给整型变量n和k分别进行赋值为5和3,n代表数组元素个数,k代表分隔的组数
L=3:R=10 ‘给整型变量L和R赋值,L值可以为数组元素最大值,R可以为数组所有元素和
Do While L+1m=(L+R)\2 ‘将L和R之和的一半取整后赋给变量m
t=0:s=0 ‘初始化变量t和s的值为0,其中t为各段元素之和,s为段中的元素个数
For i=1 To n ‘使用i来控制循环,i的初值为1,终值为n,步长为1
If t+a(i)>=m Then ‘如果t值加上数组元素a(i)的值大于数组的最大值时进行如下处理
s=s+1 ‘将s值增1
t =a(i) ‘将数组元素a(i)的值赋给变量t
Else ‘否则(如果t和数组元素值小于m值时)进行如下处理
t =t+a(i) ‘将数组元素a(i)的值累加到t中
End If ‘结束条件判断
Next i ‘结束内层循环
If t>0 then s=s+1 ‘如果t值大于0则将s值增1
If s<=k Then① Else ② ‘如果s值小于k值由将m值赋给R,否则将m值赋给L值,故①处应填写R=M,②处应填写L=m
Loop ‘结束内层循环
Label1.Caption=“最小值为”&Str(L) ‘使用标签1输出每段和的最大值中的最小值L
由以上程序分析知, If s<=k Then① Else ② ‘如果s值小于k值由将m值赋给R,否则将m值赋给L值,故①处应填写R=M,②处应填写L=m。故答案选A。
【分析】本题考查的是使用查找法求不同分法的的各段和的最大值中的最小值。
二、非选择题(本大题共4小题,4+8+7+7,共26分)
13.(2019·湖州模拟)某中学对高一640名学生进行选科意向调查,并用Excel软件对调查数据进行处理,如图a所示。
请回答下列问题:
(1)区域M5:M10中的数据是由M4单元格利用自动填充功能得到的,则M0单元格的公式是   。
(2)要筛选出所有选“技术”的学生名单,第一步对选科1、选科2、选科3的数据建立筛选,操作步骤是   ;(单选,填字母:A .选择单元格E2,执行“筛选”命令/B .选择单元格E4:G643,执行“筛选”命令/C .选择单元格E3:G3,执行“筛选”命令)
第二步设置筛选条件选出符合条件的所有学生。若对“选科1”“选科2”、“选科3”同时设置“ ”筛选条件,   (选填:能/不能)筛选出正确的结果。
(3)根据图a中数据直接制作的图表如图b所示,创建该图表的数据区域是   。
【答案】(1)=COUNTIF(E$4: E$643,“=”&$K10)
(2)C;不能
(3)J3:J10,P3:P10
【知识点】表格数据的基本操作;表格数据的处理与计算
【解析】【解答】(1)由图可知,M4为选物理(A)课目的人数,该人数从E4到E643区域中统计而来其公式为: =COUNTIF(E$4: E$643,“=”&$K4),而M10为统计E列中选技术(G)的人数,故其公式为:=COUNTIF(E$4: E$643,“=”&$K10) 。
(2)筛选进对于不规则区域要先选择需要的区域,再执行筛选。而本题要筛选出选科1、选科2、选科3中值为“G”的区域,所以选择数据区域的标题栏,即E3:G3,再执行“筛选”命令。故第一个空答案选C。若对 “选科1”“选科2”、“选科3”同时设置“ 则筛选出的是一个人三个科目都是选“G”的人,则选出结果为空,自动筛选的各条件为“且”的关系,故本题第二个空答案选填:不能。
(3)由图可知该表为簇状柱形图,其横轴为科目的名称在J列(J3:J10),其纵轴为各科目的选科总人数在P列(P3:P10)。故答案为:J3:J10,P3:P10。
【分析】本题考查的是图表数据中公式的复制中单元格地址的引用、自动筛选操作及图表数据区域的选择。Excel的地址引用有相对地址引用和绝对地址引用及混合地址引用3种方式,相对地址引用就是单元格地址前不加任何东西,单元格地址会随单元格的变化而变化,绝对单元格地址引用就是在单元格地址前加$号,不会随单元格的变化而变化。混合引用是在行号或列标前加$号,另一个不加,在复制公式时加$号的不变,不加$号的变化。图表数据区域的选择是看其横轴和纵轴的数据,筛选可以根据条件进行手工选择。
14.(2019·湖州模拟)
小张制作主题为“江南”的多媒体作品,首先使用Photoshop软件处理图片,然后使用Flash软件制作动画。请回答下列问题:
(1)下列有关多媒体作品设计的说法正确的是 。(多选:填字母)
A.文字脚本可以作为多媒体作品制作的直接依据
B.确定作品中所用素材获取方式属于脚本编写中的媒体元素分解
C.了解整个作品的组成部分、工作流程和主要界面,可查阅其系统结构设计报告
D.作品的社会效益和经济效益属于创作需求分析
E.多媒体作品设计的过程包括需求分析、规划设计、脚本编写
(2)如图a所示,当前状态下,下列说法不正确的是 。(单选:填字母)
A.可以删除“背景”图层
B.可用“自由变换”命令修改“江南”图层的文字大小
C.无法将“荷塘”图层移动到“锦鲤”图层上方
D.将一张素材图片复制粘贴到“江南psd”中,该图像将出现在“图层1”图层
(3)如图b所示,“荷花”图层第1帧到第36帧的动画补间实现了从一朵荷花逐渐变成两朵荷花的过程,该动画类型属于   。
(4)要将动画的播放时长变为原来的两倍,则需设置帧频为   fps。
(5)如图b所示,测试场景时,在“锦鲤”图层第1帧至第36帧创建的动画实现了锦鲤从左下游动到右上的动画效果为了使该动画效果在第1帧至第20帧完成,且第20帧后“锦鲤”动画消失,正确的操作是   。
(6)如图b所示,测试影片时,单击“播放”按钮后跳转到“水墨江南”场景,并停止在该场景的第10帧,则该按钮上添加的动作命令为     。
【答案】(1)B;C;E
(2)C
(3)形状补间
(4)5
(5)将“锦鲤”图层第36帧移至第20帧,选择第21帧至第36帧执行“删除帧”或其他等价答案
(6)on(release){gotoAndstop(“水墨江南”,10);}或on(press){gotoAndstop(“水墨江南”,10);}
【知识点】多媒体作品的规划和设计;图片加工常用工具的使用;图层及图层的基本操作;动画的类型;动画的实现;常用影片控制函数的应用
【解析】【解答】(1)选项A:脚本编写包括:制定脚本大纲、编写文字脚本、编写制作脚本、媒体元素分解等四步骤,也就是说文字脚本后需要编制制作脚本,文字脚本不是多媒体作品的直接依据,本项错。选项B:媒体元素分解就是将元素按照不同的类型编制表格将确定每种素材的获取方式,本项对。选项C:系统结构设计报告也就是作品的整体设计方案,在其中说明各部分的组成、工作流程及主要界面等,本项对。选项D:应用需求分析包括:1、社会需求分析;2、作品效益分析;3、用户情况分析三部分内容。故 社会效益和经济效益需求属于社会需求分析,本项错。选项E:多媒体设计与策划包括应用需求分件和创作需求及脚本编写三部分,本项对。故答案为:BCE。
(2)选项A:“背景”图层是特殊的图层,背景图层不可以调节图层顺序,永远在最下边,不可以调节不透明度和加图层样式,以及蒙版。可以使用画笔,渐变,滤镜,图章和修饰工具。且背景图层是可以被删除的,本项对。选项B:“江南”图层为文字图层是可以使用自由变换命令修改其中文字大小的,本项对。选项C:“荷塘”图层与“锦鲤”图层并无重叠可以交换两者的顺序,本项错。选项D: 将一张素材图片复制粘贴到“江南psd”中,该图像不可能放置到任可一个图层,会形成一个新图层,本项对。故答案选C。
(3)由图可知荷花图层的动画为一绿色底纹加上一个箭头,故其动画类型属于形状补间,故本题答案填写:形状补间。
(4)由图可知原来的帧频为10fps,即每秒播放10帧,现在将时间延长1倍,则每秒播放帧数应减半,故本题答案填写:5。
(5) “锦鲤”图层的动画由第1帧到第36帧变为第1帧到第20帧,则需将第36帧的关键帧移到第20帧,故答案应填写: 将“锦鲤”图层第36帧移至第20帧,选择第21帧至第36帧执行“删除帧”或其他等价答案 。
(6)按题的要求则是在按下或释放“播放”按钮时进行动画场景的切换。故答案应填写: on(release){gotoAndstop(“水墨江南”,10);}或on(press){gotoAndstop(“水墨江南”,10);} 。
【分析】本题考查的是多媒体作品的制作过程、背景图层的作用、补间类型、动画设计及动作脚本。多媒体制作过程可分为五个步骤:确定主题、分析与策划、采集与加工、作品集成、测试与评价。多媒体设计与策划包括应用需求分件和创作需求及脚本编写三部分。作品需求分析包括应用需求分件和创作需求分析两种,其中应用需求分析,括:1、社会需求分析;2、作品效益分析;3、用户情况分析三部分内容。 创作需求分件包括:1、主题思想分析;2、结构类型分析;3、作品内容分析;4、设施需求分析;5、发布方式分析共五部分内容。脚本编写包括:制定脚本大纲、编写文字脚本、编写制作脚本、媒体元素分解等四步骤。“背景”图层是特殊的图层,背景图层不可以调节图层顺序,永远在最下边,不可以调节不透明度和加图层样式,以及蒙版。可以使用画笔,渐变,滤镜,图章和修饰工具。且背景图层是可以被删除的。补间动画有二种:动画补间和形状补间。形状补间是由一个物体到另一个物体间的变化过程,像由三角形变成四方形等。时间轴上形状补间是淡绿色底加一个黑色箭头组成的。动画补间是由一个形态到另一个形态的变化过程,像移动位置,改变角度等。时间轴上动画补间是淡紫色底加一个黑色箭头组成的。帧频就是动画播放的速率,即每秒播放动画的帧数。动画加入动作脚本可以增加多媒体作品的人机交互作用。
15.(2019·湖州模拟)落球游戏。小球从上方随机垂直掉落在孔(“.”)、平板(“-”)、左右滑坡(“/”“\”)、隔板(“|”)后,运动情况如下:
●小球落在孔上,入孔:
●垂直落在平板上,停下;
●落在左滑坡向左滚动,右滑坡向右滚动。若遇平板继续滚动,遇孔则入孔;遇隔板或滑坡则停下;或超出边界;
●落在隔板上,可能向左或向右滑落,概率分别为50%。滑落后运动规律与左右滑坡相同。
假设两个隔板不相邻且左右滑坡总是以“八”出现。小球入孔或超出边界则消失,记消失的概率为100%;小球若停下,记消失的概率为0。
如图a所示,小球随机落下,最终消失的平均概率计算过程如下:
(100%+100%+100%+0.5*(100%+0)+0+0+100%+100%+0.5*(100%+100%)+100%)/10=75%
编写VB程序求解小球消失的概率,程序运行界面如图b所示,代码如下,请回答下列问题:
Dim s As string
Dim prob As single
Private Sub Command1 Click()
Dim i As Integer, c As string
s Text1 Text
prob =0
For i =1 To Len(s)
c= Mid(s, i, 1)
If c=“.” Then
prob= prob +100
ElseIf c =“/”Then
prob= prob slope(i, True)
ElseIf c=“\” Then
prob prob+ slope(i, False)
ElseIf c=“|” Then
prob =prob+
End If
Next i
Text2 Text= Str(prob Len(s))
End sub
Function slope(k As Integer, flag As Boolean)As Single
Dim c As string
If flag Then
For j=
c= Mid(s, j, 1)
If c =“.” Then slope =100: Exit For
If c=“|” Or c=“\”Then slope =0: Exit For
Next j
If j< 1 Then slope =100
Else
For j=k+ 1 To Len (s)
c= Mid(s, j, 1)
If c=“.”Then slope =100: Exit For
If c=“|” Or c=“/” Then slope =0: Exit For
Next j
If j>Len(s) Then slope =100
End If
End Function
(1)在文本框中输入:“ ”则小球消失的概率为   。
(2)加框代码有误,请改正。
(3)请在划线处填入合适代码。
(4)若删除虚线框处的代码,运行程序,则 。(单选,填字母)
A.输出的概率值变大 B.输出的概率值变小
C.程序调试错误 D.输出的概率值不变
【答案】(1)50%
(2)k-1 to 1 step-1
(3)(slope(i, True) +slope(i, False)*0.5或其他等价答案
(4)D
【知识点】常量、变量及变量的赋值;过程与自定义函数;查找算法及程序实现
【解析】【解答】本题程序分析如下:
Dim s As string ‘定义窗体级字符串变量s
Dim prob As single ‘定义窗体级单精度变量prob
Private Sub Command1 Click() ‘命令按钮单击事件过程开始
Dim i As Integer, c As string ‘定义整型变量i和字符串变量c
s= Text1. Text ‘将从文本框1中输入的字符串赋给变量s
prob =0 ‘初始化单精度变量prob的值为0
For i =1 To Len(s) ‘使用i来控制循环,i的初值为1,终值为字符串的长度,步长为1
c= Mid(s, i, 1) ‘按i值从字符串s中中取一个字符并赋给变量c
If c=“.” Then ‘如果字符c的值为点则进行如下处理
prob= prob +100 ‘将球的消失概率累加100%
ElseIf c =“/”Then ‘否则(c值不为点时)如果为左斜杠时则进行如下处理
prob= prob+ slope(i, True) ‘使用自定义函数slope()将参数设为i值和true计算小球消失概率后累加到变量prob中
ElseIf c=“\” Then ‘否则如果c值为右斜杠时则进行如下处理
prob =prob+ slope(i, False) ‘使用自定义函数slope()将参数设为i值和false计算小球消失概率后累加到变量prob中
ElseIf c=“|” Then ‘否则如果c值为竖杠则进行如下处理
prob =prob+ ‘此时消失概率是c值为右斜杠和左斜杠概率的一半,故使用自定义函数slope()计算其概率后累加到变量prob中,故本处答案应填写: (slope(i, True) +slope(i, False))*0.5
‘如果c值为横线则其消失概率为0,故prob的值不变
End If ‘结束多条件判断
Next i ‘结束循环
Text2 .Text= Str(prob/ Len(s)) ‘在文本框2中输出消失概率的平均值
End sub ‘结束命令按钮单击事件过程开始
Function slope(k As Integer, flag As Boolean)As Single ‘定义自定义函数slope()的开始,其参数有两个,一个为k,类型为整型,一个为flag,其类型为布尔型
Dim c As string ‘定义字符串变量c
If flag Then ‘如果参数flag的值为真时则进行如下处理
For j= ‘使用j来控制循环,j的初值为参数k-1,终值为1,步长为-1即让小球向左运动以判断其消失概率,故本处应改为: k-1 to 1 step -1
c= Mid(s, j, 1) ‘按j值从字符串s中中取一个字符赋给变量c
If c =“.” Then slope =100: Exit For ‘如果c的值为点则消失概率为100%,赋给自定义变量并退出循环
If c=“|” Or c=“\”Then slope =0: Exit For ‘如果c值为竖线或右斜线则消失概率为0,赋给自定义函数slope并退出循环
Next j ‘结束循环
If j< 1 Then slope =100 ‘如果循环终了循环变量j值小于1则超过了边界故小球消失概率为100%,赋给自定义函数
Else ‘否则即flag的值为假时进行如下处理
For j=k+ 1 To Len (s) ‘使用j值来控制循环,j值由k+1到字符串s的长度,意为向右滚动
c= Mid(s, j, 1) ‘ 按j值从字符串s中中取一个字符赋给变量c
If c=“.”Then slope =100: Exit For ‘如果c的值为点则消失概率为100%,赋给自定义变量并退出循环
If c=“|” Or c=“/” Then slope =0: Exit For ‘如果c值为竖线或左斜线则消失概率为0,赋给自定义函数slope并退出循环
Next j ‘结束循环
If j>Len(s) Then slope =100 ‘如果j值超过了字符串s的长度则超过了右边界其消失概率为100%,将其赋给自定义变量
End If ‘结束条件判断
End Function ‘结束自定义函数
(1)如果文本框的值为“/\_|."则当c值为”/"时,消失概率为100%,当c值为“\”时其消失概率为0,当c值为“—”时,概率为0,当c值为“|”时则其概率为50%,当c值为“."时概率为100,故本题总概率为(100%+0+0+50%+100%)/5=50%,故本小题答案填写:50%。
(2)加框处为:使用j来控制循环,j的初值为参数k-1,终值为1,步长为-1即让小球向左运动以判断其消失概率,故本处应改为:k-1 to 1 step -1。
(3)划线处为:此时消失概率是c值为右斜杠和左斜杠概率的一半,故使用自定义函数slope()计算其概率后累加到变量prob中,故本处答案应填写:slope(i, True) +slope(i, False)*0.5。
(4)虚线框的概率为0所以加不加不影响平均概率的计算,故本题答案选D。
【分析】本题考查的是多分支判断语句及自定义函数的定义和使用。在有多种的情况(三种以上)需要作判断处理时,可以使用多分支语句结构,多分支语句结构可以对应四种语句:一种是单分支语句的简单罗列,即逐条进行判断,二是进行双分支语句的嵌套,三是使用if……elseif……else……end if语句,四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行,其他条件下的语句都跳过。自定义函数以function为关键字进行定义,定义后其可以象标准函数一样使用。
16.(2019·湖州模拟)有一个n行m列网格状临时停车场,如图a所示:在网格中随机分布若干个石头,网格中“□”表示空位,“●”表示石头。停放一辆车需要长为clen个空位、宽1个空位的空间,且车只能南北停放。编写程序,实现统计该车共有多少种停放方法。
程序实现过程:生成规模为n×m的网格,在网格边界添加一圈交通锥“▲”,并将“□” “●”、“▲”按行依次存入数组a中,在文本框Tex3中输入停放该车最小长度clen值,在文本框Text4中输出共有多少种停放方法。程序运行界面如图b所示,实现上述功能的VB代码如下:
Dim a(1 To 200) As String
Dim n as Integer, m As Integer
Private Sub Command1 Click ()
Dim i As Integer, j As Integer, k As Integer
Dim s As string
n= Val(Text1. Text)+2
m=Val(Text2 Text)+2
List1. Clear
For i=1 To n*m
If i<=m0ri>m*(n-1) or ① Then ‘在矩阵周围加上一圈边界
a(i)=“▲”
Else
k= Int(Rnd 2)
If k=1 Then a(i)=“□” Else a(i)=“●”
End If
Next i
‘在列表框List1中显示网格,代码略
End sub
Private Sub Command2 Click ()
Dim i As Integer, j As Integer, c As Integer, x As Integer, y As Integer
Dim cnt As Integer, clen As Integer
Dim flag As boolean
clen= Val(Text3. Text)
y=1
Do While y <=m
For x =1 To n
If a((x-1)*m+ y)=“□” Then
c=c+1
Else
If c ≥=clen Then
cnt=②
End if

End If
Next x
y=y+1
Loop
Text4 Text Str(cnt)
End Sub
请回答下列问题
(1)根据图a所示,车长需3个空位的汽车共有   种不同的停法。
(2)请在划线处填入合适的代码。
①   ②   ③   
【答案】(1)4
(2)i mod m=0 or i mod m=1;cnt+c-clen+1;c=0
【知识点】常见数据类型、数组;枚举算法及程序实现
【解析】【解答】本题程序分析如下:
Dim a(1 To 200) As String ‘定义窗体级字符串数组a,该数组共有200个元素
Dim n as Integer, m As Integer ‘定义窗体级整型变量n和m
Private Sub Command1 Click () ‘命令按钮1单击事件过程开始
Dim i As Integer, j As Integer, k As Integer ‘定义整型变量i、j和k
Dim s As string ‘定义字符串变量s
n= Val(Text1. Text)+2‘将从文本框1中输入的行数加2后赋给变量n,n代表加上三角后的总行数m=Val(Text2 Text)+2 '将从文本框2中输入的列数加2后赋给变量m,m代表加上三角后的总列数
List1. Clear ‘清除列表框
For i=1 To n*m ‘使用i来控制循环,i的初值为1,终值为n*m,i代表停车场数组元素的总个数
If i<=m 0r i>m*(n-1) or ① Then ‘在矩阵周围加上一圈边界,如果i的值小于等于m时(第一行)或i值大于m*(n-1)即最后一行时或i除m值的余数为0(代表本行的最后一个元素)或i除m的余数为1(代表每行的最后一个元素)时进行如下处理,故本处答案应填写: i mod m=0 or i mod m=1
a(i)=“▲” ‘将字符三角赋给数组元素a(i)
Else ‘否则,即数组元素不为四个边时进行如下处理
k= Int(Rnd 2) ‘使用随机数计算k的值,使k值为1或0
If k=1 Then a(i)=“□” Else a(i)=“●” ‘如果k值为1则将数组元素赋为一个方格代表有一个空车位,否则数组元素的值为一个圆点,代表石头
End If ‘结束条件判断
Next i ‘结束循环
‘在列表框List1中显示网格,代码略
End sub ‘结束命令按钮1单击事件过程结束
Private Sub Command2 Click () ‘命令按钮2单击事件过程开始
Dim i As Integer, j As Integer, c As Integer, x As Integer, y As Integer ‘定义整型变量i、j、c、x和y
Dim cnt As Integer, clen As Integer ‘定义整型变量cnt和clen
Dim flag As boolean ‘定义布尔型变量flag
clen= Val(Text3. Text) ‘将文本框3中输入的值赋给变量clen
y=1 ‘给y赋值为1
Do While y <=m ‘在y值小于等于m值时进行循环,y代表列数
For x =1 To n ‘使用x来控制循环,i的初值为1,终值为n,x代表行数
If a((x-1)*m+ y)=“□” Then ‘如果第x行第y列的值为空格时进行如下处理
c=c+1 ‘将c值增1,c代表空位的个数
Else ‘否则进行如下处理
If c ≥=clen Then ‘如果c值大于等于clen值(车的长度时)进行如下处理
cnt=② ‘将这个空位能停车的种数(c-clen+1)累加到变量cnt中,cnt为停车的总种数,故本处答案应填空: cnt+c-clen+1
End if ‘结束条件判断
③ ‘将c值初始化为0代表一个空位判断完毕,为计算下一个总空位做准备,故本题答案填写:c=0
End If ‘结束外层条件判断
Next x ‘结束内层循环
y=y+1 ‘将y值加1,代表列数增1
Loop ‘结束外层循环
Text4. Text= Str(cnt) ‘在文本框4中输出总的停车种数
End Sub ‘结束命令按钮2单击事件过程
(1)由图a可知,车长为3则在第3列第5行到第3列第9行共有5个空位,有5-3+1=3种停法,在第6列第6行到第6列第8行中有3个空位,共有1种停法,其它无法停车,故本小题答案填写:4。
(2)第①处为:在矩阵周围加上一圈边界,如果i的值小于等于m时(第一行)或i值大于m*(n-1)即最后一行时或i除m值的余数为0(代表本行的最后一个元素)或i除m的余数为1(代表每行的最后一个元素)时进行如下处理,故本处答案应填写: i mod m=0 。
第②处为:将这个空位能停车的种数(c-clen+1)累加到变量cnt中,cnt为停车的总种数,故本处答案应填空: cnt+c-clen+1。
第③处为:将c值初始化为0代表一个空位判断完毕,为计算下一个总空位做准备,故本题答案填写:c=0。
【分析】本题考查的是使用一维数组来表示行列的方法及使用使用穷举法和使用计数器来统计停车种数的方算法。使用一维数组表示二维数组时注意每行的个数从而来分隔数组。枚举法的本质就是从所有候选答案中去搜索正确的解,使用该算法需要满足两个条件:(1)可预先确定候选答案的数量;(2)候选答案的范围在求解之前必须有一个确定的集合。本题有两个计数器,计数器形式为:cnt= cnt+c-clen+1 和c=c+1。
1 / 1浙江省湖州、衢州、丽水三地市2020届高三上学期信息技术11月教学质量检测试卷
一、选择题(本大题共12小题;每小题2分,共24分。)
1.(2019·湖州模拟)下列有关信息与信息安全的说法,正确的是(  )
A.书本不是信息,书本上的文字是信息
B.图像、声音、动画、视频是信息的表达技术
C.不联网的计算机不会感染病毒
D.对数据进行定期备份是一种有效的信息安全防护措施
2.(2019·湖州模拟)下列有关网页和电子邮件的说法,正确的是(  )
A.记事本程序可以编辑并解释执行HTML代码
B.执行“添加到收藏夹”操作,实际上保存了网页的URL
C.通过网页收发电子邮件不需要使用SMTP和POP3协议
D.只有知道收件人的电子邮件地址和密码才能发送电子邮件
3.(2019·湖州模拟)下列有关 Access数据表的说法,正确的是(  )
A.数据表中的字段名称及数据类型只能在设计视图中修改
B.数据类型为“自动编号”的字段值一定有序
C.数据表中某字段数据类型为“是/否”,可以在该字段输入“是”
D.数据表中的记录可以通过数据库应用系统进行添加和删除
4.(2019·湖州模拟)使用UltraEdit软件观察字符“C9+1高校排名!”的内码,部分界面如图所示。
则下列说法正确的是(  )
A.该字符串中只有3个ASCII码字符
B.存储该字符串共需要13个字节
C.字符“10”的内码是40H
D.字符“名”的二进制编码是11000011 11111011
5.(2019·湖州模拟)使用Goldwave软件编辑某音频文件,部分界面如图所示。
下列说法正确的是(  )
A.执行“静音”操作,音频时长将变成20秒
B.执行“删除”操作并按原参数保存,音频文件存储容量不变
C.执行“插入静音”操作添加10秒静音后,音频第10秒到第20秒静音
D.将音频另存时选择双声道,其他参数不变,则存储容量变成原来的2倍
6.(2019·湖州模拟)一段时长为10秒、1024×768像素、256级灰度、总帧数为300帧的未经压缩AVI格式无声视频,其文件存储容量约为(  )
A.28.12MB B.225MB C.2.2GB D.7.03GB
7.(2019·湖州模拟)下列VB表达式的值等于128的是(  )
A.Abs(Int(-128.3)) B.Val(Str(120)+“8”)
C.2^8\6/3 D.Mid(“3612876”,3,3)
8.(2019·湖州模拟)某算法的部分流程图如图所示,下列说法正确的是(  )
A.该流程用于计算并输出1+2-3+4+…-49+50的值
B.执行该部分流程后,变量a的值为50
C.执行该部分流程后,“s←s+a”共执行25次
D.执行该部分流程后,“a<=50 ”共执行50次
9.(2019·湖州模拟)有如下VB程序段:
s=0
For k =3 To 1 Step-1
If k <=1 Then x=1
If k <=2 Then x=2
If k <=3 Then x=3
s=s+x
Next k
Text1. Text= Str(s)
该程序段运行后,文本框Text1中显示的内容是(  )
A.9 B.7 C.6 D.5
10.(2019·湖州模拟)对n个元素的数组a进行升序排列:第一遍将最小的数移至第1个位置,将最大的数移至第n个位置;第二遍将余下元素中的最小和最大数分别移至第2个和第n-1个位置,以此类推,直到所有数组元素按升序排列。部分代码如下:
m1=1:m2=n
Do While m1< m2
For i=m2 To m1+1 Step -1
If a(i)( a(i-1)Then t= a(i): a(i)=a(i-1): a(i-1)=t
Next i

If a(i)> a(i +1). Then t= a(i): a(i)=a(i+1): a(i+1)=t
Next i
m1=m1+1
m2=m2-1
Loop
要使程序实现上述算法思想,则代码中①处的语句是(  )
A.For i=m1+1 To m2-1 B.For i =m2-2 To m1-2 Step -1
C.For i=m1+2 To m2-2 D.For i= m2-1 To m1+1 Step -1
11.(2019·湖州模拟)有如下VB程序段:
min=100:x=0
Do While x < =16
d1=Sqr(9+(x-4)*(x-4))
d2=Sqr(36+(16-x)*(16-x))
If d1+d2x=x+0.1
Loop
Text1.Text=St(min)
该程序段运行后,文本框Text1中显示的内容是(  )
A.14 B.15 C.16.42 D.18.37
12.(2019·湖州模拟)给定含有n个正整数元素的数组a,将其分成连续的k(1a(1)=1:a(2)=2:a(3)=3:a(4)=3:a(5)=1
n=5:k=3
L=3:R=10 ‘L值可以为数组元素最大值,R可以为数组所有元素和
Do While L+1m=(L+R)\2
t=0:s=0
For i=1 To n
If t+a(i)>=m Then
s=s+1
t =a(i)
Else
t =t+a(i)
End If
Next i
If t>0 then s=s+1
If s<=k Then① Else ②
Loop
Label1.Caption=“最小值为”&Str(L)
要使程序实现上述算法思想,则代码中①②处应为(  )
A.①R=m ②L=m B.①L=m ②R=m
C.①R=m+1 ②L=m-1 D.①L=m+1 ②R=m-1
二、非选择题(本大题共4小题,4+8+7+7,共26分)
13.(2019·湖州模拟)某中学对高一640名学生进行选科意向调查,并用Excel软件对调查数据进行处理,如图a所示。
请回答下列问题:
(1)区域M5:M10中的数据是由M4单元格利用自动填充功能得到的,则M0单元格的公式是   。
(2)要筛选出所有选“技术”的学生名单,第一步对选科1、选科2、选科3的数据建立筛选,操作步骤是   ;(单选,填字母:A .选择单元格E2,执行“筛选”命令/B .选择单元格E4:G643,执行“筛选”命令/C .选择单元格E3:G3,执行“筛选”命令)
第二步设置筛选条件选出符合条件的所有学生。若对“选科1”“选科2”、“选科3”同时设置“ ”筛选条件,   (选填:能/不能)筛选出正确的结果。
(3)根据图a中数据直接制作的图表如图b所示,创建该图表的数据区域是   。
14.(2019·湖州模拟)
小张制作主题为“江南”的多媒体作品,首先使用Photoshop软件处理图片,然后使用Flash软件制作动画。请回答下列问题:
(1)下列有关多媒体作品设计的说法正确的是 。(多选:填字母)
A.文字脚本可以作为多媒体作品制作的直接依据
B.确定作品中所用素材获取方式属于脚本编写中的媒体元素分解
C.了解整个作品的组成部分、工作流程和主要界面,可查阅其系统结构设计报告
D.作品的社会效益和经济效益属于创作需求分析
E.多媒体作品设计的过程包括需求分析、规划设计、脚本编写
(2)如图a所示,当前状态下,下列说法不正确的是 。(单选:填字母)
A.可以删除“背景”图层
B.可用“自由变换”命令修改“江南”图层的文字大小
C.无法将“荷塘”图层移动到“锦鲤”图层上方
D.将一张素材图片复制粘贴到“江南psd”中,该图像将出现在“图层1”图层
(3)如图b所示,“荷花”图层第1帧到第36帧的动画补间实现了从一朵荷花逐渐变成两朵荷花的过程,该动画类型属于   。
(4)要将动画的播放时长变为原来的两倍,则需设置帧频为   fps。
(5)如图b所示,测试场景时,在“锦鲤”图层第1帧至第36帧创建的动画实现了锦鲤从左下游动到右上的动画效果为了使该动画效果在第1帧至第20帧完成,且第20帧后“锦鲤”动画消失,正确的操作是   。
(6)如图b所示,测试影片时,单击“播放”按钮后跳转到“水墨江南”场景,并停止在该场景的第10帧,则该按钮上添加的动作命令为     。
15.(2019·湖州模拟)落球游戏。小球从上方随机垂直掉落在孔(“.”)、平板(“-”)、左右滑坡(“/”“\”)、隔板(“|”)后,运动情况如下:
●小球落在孔上,入孔:
●垂直落在平板上,停下;
●落在左滑坡向左滚动,右滑坡向右滚动。若遇平板继续滚动,遇孔则入孔;遇隔板或滑坡则停下;或超出边界;
●落在隔板上,可能向左或向右滑落,概率分别为50%。滑落后运动规律与左右滑坡相同。
假设两个隔板不相邻且左右滑坡总是以“八”出现。小球入孔或超出边界则消失,记消失的概率为100%;小球若停下,记消失的概率为0。
如图a所示,小球随机落下,最终消失的平均概率计算过程如下:
(100%+100%+100%+0.5*(100%+0)+0+0+100%+100%+0.5*(100%+100%)+100%)/10=75%
编写VB程序求解小球消失的概率,程序运行界面如图b所示,代码如下,请回答下列问题:
Dim s As string
Dim prob As single
Private Sub Command1 Click()
Dim i As Integer, c As string
s Text1 Text
prob =0
For i =1 To Len(s)
c= Mid(s, i, 1)
If c=“.” Then
prob= prob +100
ElseIf c =“/”Then
prob= prob slope(i, True)
ElseIf c=“\” Then
prob prob+ slope(i, False)
ElseIf c=“|” Then
prob =prob+
End If
Next i
Text2 Text= Str(prob Len(s))
End sub
Function slope(k As Integer, flag As Boolean)As Single
Dim c As string
If flag Then
For j=
c= Mid(s, j, 1)
If c =“.” Then slope =100: Exit For
If c=“|” Or c=“\”Then slope =0: Exit For
Next j
If j< 1 Then slope =100
Else
For j=k+ 1 To Len (s)
c= Mid(s, j, 1)
If c=“.”Then slope =100: Exit For
If c=“|” Or c=“/” Then slope =0: Exit For
Next j
If j>Len(s) Then slope =100
End If
End Function
(1)在文本框中输入:“ ”则小球消失的概率为   。
(2)加框代码有误,请改正。
(3)请在划线处填入合适代码。
(4)若删除虚线框处的代码,运行程序,则 。(单选,填字母)
A.输出的概率值变大 B.输出的概率值变小
C.程序调试错误 D.输出的概率值不变
16.(2019·湖州模拟)有一个n行m列网格状临时停车场,如图a所示:在网格中随机分布若干个石头,网格中“□”表示空位,“●”表示石头。停放一辆车需要长为clen个空位、宽1个空位的空间,且车只能南北停放。编写程序,实现统计该车共有多少种停放方法。
程序实现过程:生成规模为n×m的网格,在网格边界添加一圈交通锥“▲”,并将“□” “●”、“▲”按行依次存入数组a中,在文本框Tex3中输入停放该车最小长度clen值,在文本框Text4中输出共有多少种停放方法。程序运行界面如图b所示,实现上述功能的VB代码如下:
Dim a(1 To 200) As String
Dim n as Integer, m As Integer
Private Sub Command1 Click ()
Dim i As Integer, j As Integer, k As Integer
Dim s As string
n= Val(Text1. Text)+2
m=Val(Text2 Text)+2
List1. Clear
For i=1 To n*m
If i<=m0ri>m*(n-1) or ① Then ‘在矩阵周围加上一圈边界
a(i)=“▲”
Else
k= Int(Rnd 2)
If k=1 Then a(i)=“□” Else a(i)=“●”
End If
Next i
‘在列表框List1中显示网格,代码略
End sub
Private Sub Command2 Click ()
Dim i As Integer, j As Integer, c As Integer, x As Integer, y As Integer
Dim cnt As Integer, clen As Integer
Dim flag As boolean
clen= Val(Text3. Text)
y=1
Do While y <=m
For x =1 To n
If a((x-1)*m+ y)=“□” Then
c=c+1
Else
If c ≥=clen Then
cnt=②
End if

End If
Next x
y=y+1
Loop
Text4 Text Str(cnt)
End Sub
请回答下列问题
(1)根据图a所示,车长需3个空位的汽车共有   种不同的停法。
(2)请在划线处填入合适的代码。
①   ②   ③   
答案解析部分
1.【答案】D
【知识点】信息及其特征;信息系统安全防护
【解析】【解答】选项A:书本不是信息,书上的文字也不是信息,它们都是信息的载体,文字表达的知识才是信息,本项错。选项B: 图像、声音、动画、视频是信息表达方式,而电视、计算机、报刊杂志才是信息的表达技术。本项错。选项C:病毒可以通过软盘、U盘、光盘等可移动设备进行传播并不一定依靠网络传播,本项错。选项D:信息安全采取的措施很多,对数据进行定期备份,到时恢复也是安全措施之一,本项对。故答案选D。
【分析】本题考查的是信息和载体、信息的表达技术和形式以及信息安全防护。信息是事物运动的状态和方式,是事物内部结构和外部联系的状态和方式,载体是指能够运送其他物体或传递信息和能量的物体。同一种信息内容可以采用不同的表达方式,以满足信息接收者的实际需要。常用的信息表达技术有:广播电视、报刊书籍、多媒体技术和网络技术等,其中多媒体技术和网络技术是信息社会中比较重要的信息表达技术。信息安全主要包括以下五方面的内容,即需保证信息的保密性、真实性、完整性、未授权拷贝和所寄生系统的安全性。
2.【答案】B
【知识点】电子邮件,电子公告板等信息交流方式
【解析】【解答】选项A:记事本可以编辑HTML代码,但不能解释并执行HTML代码,浏览器才行。选项B:将网址添加到“收藏夹”实际上只是保存了网页的网址,本项对。选项C:收发电子邮件分为两步,第一步为发送邮件,使用SMTP协议,第二步为收邮件,使用POP3协议。选项D:只要知道收件人的电子邮件地址而不需要知道收件人的密码就可以发送电子邮件。故答案选B。
【分析】本题考查的是网页的编辑及收发电子邮件的知识。HTML语言又称超文本标记语言,其实质为一种文本文件可以使用记事本、Word等文字处理软件编辑,但浏览时需使用浏览器浏览。收发电子邮件分为两步,第一步为发送邮件,使用SMTP协议,第二步为收邮件,使用POP3协议。
3.【答案】D
【知识点】数据表、字段、记录的概念;数据表、字段、记录的编辑
【解析】【解答】选项A:在Access 2007版本后,在数据表视图下也可以修改字段名称及类型。选项B:数据类型为”自动编号“有两种类型,一种为递增,另一种为随机,如为随机则其字段是无序的。选项C: 数据表中某字段数据类型为“是/否” ,则只能在该字段下打对勾或去掉对勾。选项D:数据库应用系统就是基于数据库开发的应用系统,通过数据库应用系统可以实现对数据表中数据的查询、增加、删除等操作。故答案选D。
【分析】本题考查的是数据表视图方式及数据表的字段类型。数据表的视图方式共有四种:设计视图、数据表视图、数据透视表视图和数据透视图视图。1、在设计视图中可以对表格的结构进行设置,比如有哪些字段,每个字段的类型等。2、在数据表视图中可能浏览、修改、增减每条记录的内容, 是最常见也是系统默认的视图。3、在数据透视表视图和数据透视图视图中,我们可以根据数据字段,设置交叉统计表格的行字段、列字段等,将数据以分类的方式显示成表格或统计图。Access允许九种数据类型:文本、备注、数值、日期/时间、货币、自动编号、是/否、OLE对象、超级链接、查询向导。在表的设计视图中,每一个字段都有设计类型。
4.【答案】D
【知识点】信息的编码;进制及数制转换
【解析】【解答】选项A:在该字符串中共有”9、+、1、!“四个ASCII码字符,本项错。选项B:由图知,该字符串共由28个十六进制表示,故需要14个字节存储该字符串,本项错。选项C:由字符”9“的内码”39H“知字符”10“的内码为“3AH”,因为为十六进制表示,故9后多1不能进位应使用字符“A”,本项错。选项D:由字符名的内码“C3 FB”知其二进制编码为“1100 0011 1111 1011”。故答案选D。
【分析】本题考查的是汉字和英文字母、字符的内码。在内存中一个汉字由2个字节、4位十六进制数、16位二进制数表示,一个英文字母由1个字节、2位十六进制数、8位二进制数表示。另外对于一个十六进制数逢9+1并不进1,逢15+1才进1。
5.【答案】C
【知识点】声音素材的基本处理;声音、图像、视频编码
【解析】【解答】选项A:执行“静音”后第10秒到第30秒变为静音,但并没有删除该段音频,时长仍为40秒,本项错。选项B: 执行“删除”操作并按原参数保存, 由于时长由原40秒变为了20秒,故其存储容量减少一半,故本项错。选项C:由图知本音频选中的为第10秒到第30秒,故执行“插入静音”后第10秒到第30秒变为被向后移动静音,第10秒到第20秒变为静音,本项对。选项D: 将音频另存时选择双声道,其他参数不变, 右声道没有任何参数,故其存储容量不变,本项错。故答案选C。
【分析】本题考查的是"静音”、“插入静音”及“删除”操作。在进行这些操作前先应进行设标操作,对于“静音”则是将选中部分设为静音,对于“插入静音”则在选中部分前插入静音,对于“删除”,如为单声道则将选中部分删除,如为双声道,如只选中一个声道则相当于静音操作,如选中两个声道则时长减少,删除选中部分。
6.【答案】B
【知识点】声音、图像、视频编码
【解析】【解答】由视频文件的存储容量公式知该视频文件的存储容量为: 256级灰度就相当于1个点有256种颜色,可用8位二进制数(1个字节)来表示。存储容量=1024×768 ×1×300=235929600B=230400KB=225MB,故答案选B。
【分析】本题考查的是视频存储容量公式。视频文件存储容量=(水平像素×垂直像素×每个像素所需位数/8)*帧频*时长(字节),在本题中没有给出帧频,但给出了总帧数,可代替帧频*时长。
7.【答案】C
【知识点】运算符、基本运算与表达式
【解析】【解答】选项A: Abs(Int(-128.3)) =ABS(-129)=129;选项B: Val(Str(120)+“8”) =val(“120”+“8”)=val(“1208”)=1208;选项C:2^8\6/3=256\6/3=256/2=128;选项D: Mid(“3612876”,3,3) =“128”。故答案选C。
【分析】本题考查的是常用函数的功能及数值运算符的运算优先级。ABS()是求参数的绝对值,int()是求不大于参数的一个整数,尤其是负数,其值不是直接舍去小数部分而是进一后再取负数。VAL()是将字符串转为数值型。str()则是将数值型转为字符串,mid()为中取函数。而数值运算的顺序为函数、()->^->*、 /->mod 、\->+、-。
8.【答案】C
【知识点】算法的常用表示方法;算法的控制结构
【解析】【解答】由本题的流程图可知,先将s的值赋为0,a的值赋为1,再去判断a值是否小于等于50,如果小于等于50则再去判断a值是否为奇数,如为奇数则将a值累加到变量s中,否则将a的相反数累加到s中,累加完后再将a值增1,再进行下一次的判断,直到a值大于50为止,最后输出s值。选项A:由流程图知,该题计算并输出的数学公式为1-2+3-4+……+49-50。本项错。选项B:由流程图的条件知当a小于等于50时执行循环,当a大于50时才能退出循环,故执行完该程序时a的值为51而不是50。本项错。选项C:由图可知,a的值由1变为51共执行了50次循环,在50次循环中a有25为奇数,25次为偶数,本项对。选项D:由图知当执行该部分流程后,循环了50次但执行条件判断为51次,在第51次时退出循环,故 “a<=50 ”共执行51次而不是50次。本项错。故答案选C。
【分析】本题考查的是对流程图的分析。流程图使用标准的框图符号绘制,框图一般按从上到下、从左到右的方向画,除了判断框外,程序框的符号只有一个进入点和一个退出点,而判断框则具有一个进入点和多个退出点。在分析流程图时注意流程线的数据流向。
9.【答案】A
【知识点】算法的控制结构;常量、变量及变量的赋值
【解析】【解答】本题程序分析如下:
s=0 ‘将变量s的值设为0
For k =3 To 1 Step-1 ‘使用k控制循环,k的初值为3,终值1,步长为-1
If k <=1 Then x=1 ‘如果k值小于等于1时,x值为1
If k <=2 Then x=2 ‘如果k值小于等2时,x值为2
If k <=3 Then x=3 ‘如果k值小于等3时,x值为3
s=s+x ‘将x值累加到s中
Next k ‘结束循环
Text1. Text= Str(s) ‘在文本框1中输出s值
由以上程序分析知,k值为3、2、1,在循环体中依次判断k值是否小于等于1、2、3,即3次循环要依次执行,对于第三个条件语句k<=3 Then x=3在每次循环时都要执行且在条件循环的最下面,故s=3+3+3=9。故答案选A。
【分析】本题考查的是条件循环语句及条件判断语句。在本程序中使用for进行循环,for为定次循环即循环次数固定,而对于循环体内的三个条件判断语名要依次执行,在x值被多次赋值时,使用该变量要取上面离该语句最近的赋值语句。
10.【答案】A
【知识点】常见数据类型、数组;排序算法及程序实现
【解析】【解答】本题程序分析如下:
m1=1:m2=n ‘给两个变量m1和m2赋初值1和n,m1和m2为指示本轮数组下标最小和最大的两个变量
Do While m1< m2 ‘在m1比m2时进行循环
For i=m2 To m1+1 Step -1 ‘使用i来控制内层循环,i的初值为m2,终值为m1+1,步长为-1,用来查找本轮的最大值将移至m2位置上
If a(i)<( a(i-1)Then t= a(i): a(i)=a(i-1): a(i-1)=t ‘如果数组的一个元素的值比其前面的元素值小时则借助第三变量t交换前后两个元素的值
Next i ‘结束内层循环,本循环是将最大值移到第m2指示的位上
① ‘使用i来控制内层循环,i的初值为m1+1,终值为m2-1,步长为1,用来查找本轮的最小值并将该值放置到m1上,故本题答案应填写:for i=m1+1 to m2-1
If a(i)> a(i +1). Then t= a(i): a(i)=a(i+1): a(i+1)=t ‘如果数组的一个元素的值比其后面的元素值大时则借助第三变量t交换前后两个元素的值
Next i ‘结束内层循环
m1=m1+1 ‘将m1值增1
m2=m2-1 ‘将m2值减1
Loop ‘结束外层循环
由以上程序知,在①处为:使用i来控制内层循环,i的初值为m1+1,终值为m2-1,步长为1,用来查找本轮的最小值并将该值放置到m1上,故本题答案应填写:for i=m1+1 to m2-1。故答案选A。
【分析】本题考查的是冒泡法。在本题中使用两个冒泡法选出最大值放到m2位置上,选出最小值放置到m1上,在使用冒泡法进行排序时使用i控制外层循环,代表每次的比较轮数,j控制内层循环代表每轮比较次数,在进行一轮比较后将最大值放到数列的末尾,在经过n-1轮比较后将输入的数排成一个由小到大(或由大到小)的数列。
11.【答案】B
【知识点】算法的控制结构;常量、变量及变量的赋值
【解析】【解答】本题程序分析如下:
min=100:x=0 '给变量min的值赋为100,给变量x的值赋为0
Do While x < =16 '使用x控制循环,当x的值小于等于16时执行循环
d1=Sqr(9+(x-4)*(x-4)) '在x值小于16时计算d1值
d2=Sqr(36+(16-x)*(16-x)) '在x值小于16时计算d2值
If d1+d2x=x+0.1 '将x值增0.1
Loop '结束条件判断
Text1.Text=St(min) '在文本框1中输出最小值变量min的值
由以上程序分析知,x的值由0变为16,每次的增量为0.1,而d1的值为 Sqr(9+(x-4)*(x-4)) ,d2的值为 Sqr(36+(16-x)*(16-x)) 。而程序是求d1和d2之和的最小值。由题义可知,当x=10.1时两者之和最小,此时d1+d2=15。故答案选B。
【分析】本题考查的是使用数学公式求最小值。对于该类题需知使数学公式求极值的方法或使用程序运一次。
12.【答案】A
【知识点】查找算法及程序实现
【解析】【解答】本题程序分析如下:
a(1)=1:a(2)=2:a(3)=3:a(4)=3:a(5)=1 ‘
n=5:k=3 ‘给整型变量n和k分别进行赋值为5和3,n代表数组元素个数,k代表分隔的组数
L=3:R=10 ‘给整型变量L和R赋值,L值可以为数组元素最大值,R可以为数组所有元素和
Do While L+1m=(L+R)\2 ‘将L和R之和的一半取整后赋给变量m
t=0:s=0 ‘初始化变量t和s的值为0,其中t为各段元素之和,s为段中的元素个数
For i=1 To n ‘使用i来控制循环,i的初值为1,终值为n,步长为1
If t+a(i)>=m Then ‘如果t值加上数组元素a(i)的值大于数组的最大值时进行如下处理
s=s+1 ‘将s值增1
t =a(i) ‘将数组元素a(i)的值赋给变量t
Else ‘否则(如果t和数组元素值小于m值时)进行如下处理
t =t+a(i) ‘将数组元素a(i)的值累加到t中
End If ‘结束条件判断
Next i ‘结束内层循环
If t>0 then s=s+1 ‘如果t值大于0则将s值增1
If s<=k Then① Else ② ‘如果s值小于k值由将m值赋给R,否则将m值赋给L值,故①处应填写R=M,②处应填写L=m
Loop ‘结束内层循环
Label1.Caption=“最小值为”&Str(L) ‘使用标签1输出每段和的最大值中的最小值L
由以上程序分析知, If s<=k Then① Else ② ‘如果s值小于k值由将m值赋给R,否则将m值赋给L值,故①处应填写R=M,②处应填写L=m。故答案选A。
【分析】本题考查的是使用查找法求不同分法的的各段和的最大值中的最小值。
13.【答案】(1)=COUNTIF(E$4: E$643,“=”&$K10)
(2)C;不能
(3)J3:J10,P3:P10
【知识点】表格数据的基本操作;表格数据的处理与计算
【解析】【解答】(1)由图可知,M4为选物理(A)课目的人数,该人数从E4到E643区域中统计而来其公式为: =COUNTIF(E$4: E$643,“=”&$K4),而M10为统计E列中选技术(G)的人数,故其公式为:=COUNTIF(E$4: E$643,“=”&$K10) 。
(2)筛选进对于不规则区域要先选择需要的区域,再执行筛选。而本题要筛选出选科1、选科2、选科3中值为“G”的区域,所以选择数据区域的标题栏,即E3:G3,再执行“筛选”命令。故第一个空答案选C。若对 “选科1”“选科2”、“选科3”同时设置“ 则筛选出的是一个人三个科目都是选“G”的人,则选出结果为空,自动筛选的各条件为“且”的关系,故本题第二个空答案选填:不能。
(3)由图可知该表为簇状柱形图,其横轴为科目的名称在J列(J3:J10),其纵轴为各科目的选科总人数在P列(P3:P10)。故答案为:J3:J10,P3:P10。
【分析】本题考查的是图表数据中公式的复制中单元格地址的引用、自动筛选操作及图表数据区域的选择。Excel的地址引用有相对地址引用和绝对地址引用及混合地址引用3种方式,相对地址引用就是单元格地址前不加任何东西,单元格地址会随单元格的变化而变化,绝对单元格地址引用就是在单元格地址前加$号,不会随单元格的变化而变化。混合引用是在行号或列标前加$号,另一个不加,在复制公式时加$号的不变,不加$号的变化。图表数据区域的选择是看其横轴和纵轴的数据,筛选可以根据条件进行手工选择。
14.【答案】(1)B;C;E
(2)C
(3)形状补间
(4)5
(5)将“锦鲤”图层第36帧移至第20帧,选择第21帧至第36帧执行“删除帧”或其他等价答案
(6)on(release){gotoAndstop(“水墨江南”,10);}或on(press){gotoAndstop(“水墨江南”,10);}
【知识点】多媒体作品的规划和设计;图片加工常用工具的使用;图层及图层的基本操作;动画的类型;动画的实现;常用影片控制函数的应用
【解析】【解答】(1)选项A:脚本编写包括:制定脚本大纲、编写文字脚本、编写制作脚本、媒体元素分解等四步骤,也就是说文字脚本后需要编制制作脚本,文字脚本不是多媒体作品的直接依据,本项错。选项B:媒体元素分解就是将元素按照不同的类型编制表格将确定每种素材的获取方式,本项对。选项C:系统结构设计报告也就是作品的整体设计方案,在其中说明各部分的组成、工作流程及主要界面等,本项对。选项D:应用需求分析包括:1、社会需求分析;2、作品效益分析;3、用户情况分析三部分内容。故 社会效益和经济效益需求属于社会需求分析,本项错。选项E:多媒体设计与策划包括应用需求分件和创作需求及脚本编写三部分,本项对。故答案为:BCE。
(2)选项A:“背景”图层是特殊的图层,背景图层不可以调节图层顺序,永远在最下边,不可以调节不透明度和加图层样式,以及蒙版。可以使用画笔,渐变,滤镜,图章和修饰工具。且背景图层是可以被删除的,本项对。选项B:“江南”图层为文字图层是可以使用自由变换命令修改其中文字大小的,本项对。选项C:“荷塘”图层与“锦鲤”图层并无重叠可以交换两者的顺序,本项错。选项D: 将一张素材图片复制粘贴到“江南psd”中,该图像不可能放置到任可一个图层,会形成一个新图层,本项对。故答案选C。
(3)由图可知荷花图层的动画为一绿色底纹加上一个箭头,故其动画类型属于形状补间,故本题答案填写:形状补间。
(4)由图可知原来的帧频为10fps,即每秒播放10帧,现在将时间延长1倍,则每秒播放帧数应减半,故本题答案填写:5。
(5) “锦鲤”图层的动画由第1帧到第36帧变为第1帧到第20帧,则需将第36帧的关键帧移到第20帧,故答案应填写: 将“锦鲤”图层第36帧移至第20帧,选择第21帧至第36帧执行“删除帧”或其他等价答案 。
(6)按题的要求则是在按下或释放“播放”按钮时进行动画场景的切换。故答案应填写: on(release){gotoAndstop(“水墨江南”,10);}或on(press){gotoAndstop(“水墨江南”,10);} 。
【分析】本题考查的是多媒体作品的制作过程、背景图层的作用、补间类型、动画设计及动作脚本。多媒体制作过程可分为五个步骤:确定主题、分析与策划、采集与加工、作品集成、测试与评价。多媒体设计与策划包括应用需求分件和创作需求及脚本编写三部分。作品需求分析包括应用需求分件和创作需求分析两种,其中应用需求分析,括:1、社会需求分析;2、作品效益分析;3、用户情况分析三部分内容。 创作需求分件包括:1、主题思想分析;2、结构类型分析;3、作品内容分析;4、设施需求分析;5、发布方式分析共五部分内容。脚本编写包括:制定脚本大纲、编写文字脚本、编写制作脚本、媒体元素分解等四步骤。“背景”图层是特殊的图层,背景图层不可以调节图层顺序,永远在最下边,不可以调节不透明度和加图层样式,以及蒙版。可以使用画笔,渐变,滤镜,图章和修饰工具。且背景图层是可以被删除的。补间动画有二种:动画补间和形状补间。形状补间是由一个物体到另一个物体间的变化过程,像由三角形变成四方形等。时间轴上形状补间是淡绿色底加一个黑色箭头组成的。动画补间是由一个形态到另一个形态的变化过程,像移动位置,改变角度等。时间轴上动画补间是淡紫色底加一个黑色箭头组成的。帧频就是动画播放的速率,即每秒播放动画的帧数。动画加入动作脚本可以增加多媒体作品的人机交互作用。
15.【答案】(1)50%
(2)k-1 to 1 step-1
(3)(slope(i, True) +slope(i, False)*0.5或其他等价答案
(4)D
【知识点】常量、变量及变量的赋值;过程与自定义函数;查找算法及程序实现
【解析】【解答】本题程序分析如下:
Dim s As string ‘定义窗体级字符串变量s
Dim prob As single ‘定义窗体级单精度变量prob
Private Sub Command1 Click() ‘命令按钮单击事件过程开始
Dim i As Integer, c As string ‘定义整型变量i和字符串变量c
s= Text1. Text ‘将从文本框1中输入的字符串赋给变量s
prob =0 ‘初始化单精度变量prob的值为0
For i =1 To Len(s) ‘使用i来控制循环,i的初值为1,终值为字符串的长度,步长为1
c= Mid(s, i, 1) ‘按i值从字符串s中中取一个字符并赋给变量c
If c=“.” Then ‘如果字符c的值为点则进行如下处理
prob= prob +100 ‘将球的消失概率累加100%
ElseIf c =“/”Then ‘否则(c值不为点时)如果为左斜杠时则进行如下处理
prob= prob+ slope(i, True) ‘使用自定义函数slope()将参数设为i值和true计算小球消失概率后累加到变量prob中
ElseIf c=“\” Then ‘否则如果c值为右斜杠时则进行如下处理
prob =prob+ slope(i, False) ‘使用自定义函数slope()将参数设为i值和false计算小球消失概率后累加到变量prob中
ElseIf c=“|” Then ‘否则如果c值为竖杠则进行如下处理
prob =prob+ ‘此时消失概率是c值为右斜杠和左斜杠概率的一半,故使用自定义函数slope()计算其概率后累加到变量prob中,故本处答案应填写: (slope(i, True) +slope(i, False))*0.5
‘如果c值为横线则其消失概率为0,故prob的值不变
End If ‘结束多条件判断
Next i ‘结束循环
Text2 .Text= Str(prob/ Len(s)) ‘在文本框2中输出消失概率的平均值
End sub ‘结束命令按钮单击事件过程开始
Function slope(k As Integer, flag As Boolean)As Single ‘定义自定义函数slope()的开始,其参数有两个,一个为k,类型为整型,一个为flag,其类型为布尔型
Dim c As string ‘定义字符串变量c
If flag Then ‘如果参数flag的值为真时则进行如下处理
For j= ‘使用j来控制循环,j的初值为参数k-1,终值为1,步长为-1即让小球向左运动以判断其消失概率,故本处应改为: k-1 to 1 step -1
c= Mid(s, j, 1) ‘按j值从字符串s中中取一个字符赋给变量c
If c =“.” Then slope =100: Exit For ‘如果c的值为点则消失概率为100%,赋给自定义变量并退出循环
If c=“|” Or c=“\”Then slope =0: Exit For ‘如果c值为竖线或右斜线则消失概率为0,赋给自定义函数slope并退出循环
Next j ‘结束循环
If j< 1 Then slope =100 ‘如果循环终了循环变量j值小于1则超过了边界故小球消失概率为100%,赋给自定义函数
Else ‘否则即flag的值为假时进行如下处理
For j=k+ 1 To Len (s) ‘使用j值来控制循环,j值由k+1到字符串s的长度,意为向右滚动
c= Mid(s, j, 1) ‘ 按j值从字符串s中中取一个字符赋给变量c
If c=“.”Then slope =100: Exit For ‘如果c的值为点则消失概率为100%,赋给自定义变量并退出循环
If c=“|” Or c=“/” Then slope =0: Exit For ‘如果c值为竖线或左斜线则消失概率为0,赋给自定义函数slope并退出循环
Next j ‘结束循环
If j>Len(s) Then slope =100 ‘如果j值超过了字符串s的长度则超过了右边界其消失概率为100%,将其赋给自定义变量
End If ‘结束条件判断
End Function ‘结束自定义函数
(1)如果文本框的值为“/\_|."则当c值为”/"时,消失概率为100%,当c值为“\”时其消失概率为0,当c值为“—”时,概率为0,当c值为“|”时则其概率为50%,当c值为“."时概率为100,故本题总概率为(100%+0+0+50%+100%)/5=50%,故本小题答案填写:50%。
(2)加框处为:使用j来控制循环,j的初值为参数k-1,终值为1,步长为-1即让小球向左运动以判断其消失概率,故本处应改为:k-1 to 1 step -1。
(3)划线处为:此时消失概率是c值为右斜杠和左斜杠概率的一半,故使用自定义函数slope()计算其概率后累加到变量prob中,故本处答案应填写:slope(i, True) +slope(i, False)*0.5。
(4)虚线框的概率为0所以加不加不影响平均概率的计算,故本题答案选D。
【分析】本题考查的是多分支判断语句及自定义函数的定义和使用。在有多种的情况(三种以上)需要作判断处理时,可以使用多分支语句结构,多分支语句结构可以对应四种语句:一种是单分支语句的简单罗列,即逐条进行判断,二是进行双分支语句的嵌套,三是使用if……elseif……else……end if语句,四是使用select case语句。在多分支语句中一般只有一个条件下的语句得到了执行,其他条件下的语句都跳过。自定义函数以function为关键字进行定义,定义后其可以象标准函数一样使用。
16.【答案】(1)4
(2)i mod m=0 or i mod m=1;cnt+c-clen+1;c=0
【知识点】常见数据类型、数组;枚举算法及程序实现
【解析】【解答】本题程序分析如下:
Dim a(1 To 200) As String ‘定义窗体级字符串数组a,该数组共有200个元素
Dim n as Integer, m As Integer ‘定义窗体级整型变量n和m
Private Sub Command1 Click () ‘命令按钮1单击事件过程开始
Dim i As Integer, j As Integer, k As Integer ‘定义整型变量i、j和k
Dim s As string ‘定义字符串变量s
n= Val(Text1. Text)+2‘将从文本框1中输入的行数加2后赋给变量n,n代表加上三角后的总行数m=Val(Text2 Text)+2 '将从文本框2中输入的列数加2后赋给变量m,m代表加上三角后的总列数
List1. Clear ‘清除列表框
For i=1 To n*m ‘使用i来控制循环,i的初值为1,终值为n*m,i代表停车场数组元素的总个数
If i<=m 0r i>m*(n-1) or ① Then ‘在矩阵周围加上一圈边界,如果i的值小于等于m时(第一行)或i值大于m*(n-1)即最后一行时或i除m值的余数为0(代表本行的最后一个元素)或i除m的余数为1(代表每行的最后一个元素)时进行如下处理,故本处答案应填写: i mod m=0 or i mod m=1
a(i)=“▲” ‘将字符三角赋给数组元素a(i)
Else ‘否则,即数组元素不为四个边时进行如下处理
k= Int(Rnd 2) ‘使用随机数计算k的值,使k值为1或0
If k=1 Then a(i)=“□” Else a(i)=“●” ‘如果k值为1则将数组元素赋为一个方格代表有一个空车位,否则数组元素的值为一个圆点,代表石头
End If ‘结束条件判断
Next i ‘结束循环
‘在列表框List1中显示网格,代码略
End sub ‘结束命令按钮1单击事件过程结束
Private Sub Command2 Click () ‘命令按钮2单击事件过程开始
Dim i As Integer, j As Integer, c As Integer, x As Integer, y As Integer ‘定义整型变量i、j、c、x和y
Dim cnt As Integer, clen As Integer ‘定义整型变量cnt和clen
Dim flag As boolean ‘定义布尔型变量flag
clen= Val(Text3. Text) ‘将文本框3中输入的值赋给变量clen
y=1 ‘给y赋值为1
Do While y <=m ‘在y值小于等于m值时进行循环,y代表列数
For x =1 To n ‘使用x来控制循环,i的初值为1,终值为n,x代表行数
If a((x-1)*m+ y)=“□” Then ‘如果第x行第y列的值为空格时进行如下处理
c=c+1 ‘将c值增1,c代表空位的个数
Else ‘否则进行如下处理
If c ≥=clen Then ‘如果c值大于等于clen值(车的长度时)进行如下处理
cnt=② ‘将这个空位能停车的种数(c-clen+1)累加到变量cnt中,cnt为停车的总种数,故本处答案应填空: cnt+c-clen+1
End if ‘结束条件判断
③ ‘将c值初始化为0代表一个空位判断完毕,为计算下一个总空位做准备,故本题答案填写:c=0
End If ‘结束外层条件判断
Next x ‘结束内层循环
y=y+1 ‘将y值加1,代表列数增1
Loop ‘结束外层循环
Text4. Text= Str(cnt) ‘在文本框4中输出总的停车种数
End Sub ‘结束命令按钮2单击事件过程
(1)由图a可知,车长为3则在第3列第5行到第3列第9行共有5个空位,有5-3+1=3种停法,在第6列第6行到第6列第8行中有3个空位,共有1种停法,其它无法停车,故本小题答案填写:4。
(2)第①处为:在矩阵周围加上一圈边界,如果i的值小于等于m时(第一行)或i值大于m*(n-1)即最后一行时或i除m值的余数为0(代表本行的最后一个元素)或i除m的余数为1(代表每行的最后一个元素)时进行如下处理,故本处答案应填写: i mod m=0 。
第②处为:将这个空位能停车的种数(c-clen+1)累加到变量cnt中,cnt为停车的总种数,故本处答案应填空: cnt+c-clen+1。
第③处为:将c值初始化为0代表一个空位判断完毕,为计算下一个总空位做准备,故本题答案填写:c=0。
【分析】本题考查的是使用一维数组来表示行列的方法及使用使用穷举法和使用计数器来统计停车种数的方算法。使用一维数组表示二维数组时注意每行的个数从而来分隔数组。枚举法的本质就是从所有候选答案中去搜索正确的解,使用该算法需要满足两个条件:(1)可预先确定候选答案的数量;(2)候选答案的范围在求解之前必须有一个确定的集合。本题有两个计数器,计数器形式为:cnt= cnt+c-clen+1 和c=c+1。
1 / 1

展开更多......

收起↑

资源列表