资源简介

浙江省杭州市2016年信息技术高考模拟卷十四
一、选择题
1．（2016·杭州模拟）支付宝扫码支付是一种新型的付款方式。付款时只需给收银员扫一下支付码就可以完成支付。支付宝付款码产生过程属于（　　）
A．信息的采集 B．信息的编码 C．信息的发布 D．信息的表达
2．（2016·杭州模拟）某网店的评价情况如图所示,则该评价属于（　　）
A．统计评价 B．专家评价
C．个人推荐 D．核心刊物评价
3．（2016·杭州模拟）小张使用Word软件编辑文档时的部分截图如第3题图所示。则下列说法不正确的是（　　）
A．共有2处批注
B．批注[微软用户1]的内容为：Multimedia Technology
C．若全部接受图中所示的修订内容，则第一句话的文字将变为:“多媒体技术是一门多学科交叉、跨行业渗透的综合技术。”
D．批注[微软用户2]的内容为：人机交互
4．（2016·杭州模拟）在Access软件中，删除“学业水平考试成绩”数据表中的“学号”值为“20104”记录时的界面如图所示：
单击“是（Y）”按钮删除指定记录后，下列操作能恢复被删除记录数据的是（　　）
①重新输入被删除的记录的内容 ② 立即执行“撤销”命令
③ 关闭当前数据库，重新打开 ④ 关闭该数据表，重新打开
A．① B．② C．①② D．③④
5．（2016·杭州模拟）某算法流程图如图所示, 执行该算法，当i的值为6时，下列说法正确的是（　　）
A．输出s的值
B．执行语句s=s+s*i和i=i+1
C．程序出错
D．语句s=s+s*i已经执行了1次
6．（2016·杭州模拟）下列逻辑表达式中，值为False的是（　　）
A．Asc("A") < Asc("a") B．Int( Rnd * 49 ) < 49
C．3+4 <= 7 and 5+6 > 9 D．"thirty" > "two"
7．（2016·杭州模拟）红色的RGB值为RGB（255,0,0），若用十六进制表示则为#FF0000H；粉红色的RGB值为RGB（255,192,203），若用十六进制表示则为#FFC0CBH。则用十六进制表示的颜色#DADA70H对应的RGB值为(　　)
A．RGB（218,218,112） B．RGB（216,216,110）
C．RGB（220,220,115） D．RGB（217,217,110）
8．（2016·杭州模拟）在photoshop中，利用了哪些操作处理图A，得到图B（　　）
A．水平翻转 剪裁 B．垂直翻转 剪裁
C．水平翻转 缩放 D．垂直翻转 缩放
9．（2016·杭州模拟）小峰制作某flash作品“老人与狗”时的截图如图所示，从图中可知，“小狗”图层中的小狗图片仅在第1帧到第15帧出现，若要使小狗图片一直延续到第40帧，可在该图层的第16帧上进行的操作是（　　）
A．删除帧 B．清除关键帧 C．清除帧 D．剪切帧
10．（2016·杭州模拟）【加试题】某同学使用Windows附件中的“录音机”程序录制了一段音频，尚未保存，在查看其属性时得到如图所示的信息。压缩成mp3格式后的文件大小为73.5KB,则其压缩比约为（　　）
A．12:1 B．11:1 C．1:12 D．1:11
11．（2016·杭州模拟）【加试题】某高校学籍管理系统软件有2万个学生的电子档案（已按学籍号排序），假设从中取出一条记录并与待查项进行比较所花时间为8毫秒，则用对分法在该系统中查找任意一位学生档案最多花费的时间约为（　　）。
A．16万毫秒 B．8万毫秒 C．10毫秒 D．120毫秒
12．（2016·杭州模拟）自定义函数f的功能是计算自然数n的阶乘值，即f=n！。下面VB程序通过调用函数来计算S=1!+2!+3!+4!+5!+6!:
Function f(n as integer) as long
Dim j As Integer
f=1
For j=1 to n
f=f*j
Next j
End Function
Private Sub Command1_Click()
Dim s As Long, AS Integer
S=0
For i=1 to 6
Next i
Text1.text=str(s)
End Sub
方框中正确的语句是 （　　）
A．s=f(i) B．s=s+f(i) C．s=f(n) D．s=s+f(n)
二、非选择题
13．（2016·杭州模拟）小李收集了2015年某月食品价格变动的一些数据，并用Excel软件对部分食品价格变动的数据进行了分析，界面如1图所示，请回答下列问题。
（1）正确计算各种商品的涨跌幅，需在G3单元格输入公式　 　，并从G3单元格自动填充到G20单元格。 (提示：涨跌幅=（本期价格-上期价格）/上期价格*100)
（2）为更加直观地比较各类商品的价格波动情况，小李制作了如2图所示的图表。则该图表的数据区域是　 　。
（3）选中A2:G20区域，按照3图所示进行自定义筛选后，将显示　 　个数据。筛选完毕后，2图所示的图表　 　(填：会或不会)发生变化。
14．（2016·杭州模拟）小兰设计了一个“猜价格”小游戏，用户在Text1中输入所猜的价格，单击“猜一猜”按钮，如果偏高了，Label4标签中将提示“对不起，偏高了！”；若所猜的价格偏低，则Label4标签中将提示“对不起，偏低了！”；若猜中，则Label4标签中将显示“恭喜你，猜对啦！”。界面如1图所示。
（1）应用程序界面设计时，为添加“请输入您猜的价格：”对象，应使用第14题-2图所示的“控件工具箱”中的　 　（填写相应字母），并在3图所示的“属性窗口”中，将　 　属性值设置为“请输入您猜的价格：”。
（2）解决此问题的相应程序如下，请根据题意将程序补充完整。
Private Sub Command1_Click()
Dim g As Integer
Dim p As Integer
p = 99 '预设价格的值存储到p变量中
g = 　 　
If g > p Then
　 　= "对不起，偏高了！"
ElseIf g < p Then
Label4.Caption = "对不起，偏低了！"
Else
Label4.Caption = "恭喜你，猜对啦！"
　 　
End Sub
15．（2016·杭州模拟）某学校组织“书香家庭”评比活动，小强用Photoshop制作了主题为“书香家庭”的小报参加评比。部分素材如1图所示，当前编辑窗口如2图所示。
请回答下列问题：
（1）小强将“小孩.jpg”图片复制到“小孩”图层后，发现小孩图片太大，请你帮助小强解决这个问题,请选择操作需要使用的工具 （
A．图像大小 B．裁剪工具 C．自由变换）
（2）观察图层窗口（如3图所示），设置了图层样式的图层名称是　 　。
（3）将“蘑菇.jpg”图片拷贝到蘑菇图层，执行　 　操作，可得到2图左下角所示的蘑菇效果。
16．（2016·杭州模拟） 小张用Flash软件制作一个主题为生日快乐的的Flash动画，界面如1图所示，库信息如2图所示。请回答以下问题：
（1）由1图所示可知，该动画共有　 　个场景，要使当前场景播放时间延长为原来的两倍，则应将帧频调整为　 　fps。
（2）由2图所示可见名称为“礼花-mv”的元件类型是　 　。
（3）为实现让“祝你生日快乐”从右上角向信封中间位置移动并旋转一次的效果，将“文字”元件置于“文字”图层第40帧的舞台右上角，在“文字”图层第60帧处应插入一个关键帧，并将“文字”元件实例移动到信封中间的位置，然后在“文字”图层创建一个　 　 （填：动画/形状）补间。
（4）最后出现“退出”按钮，单击“退出”按钮关闭窗口，则在该按钮上设置的动作命令是　 　
17．（2016·杭州模拟）某社区进行“摘葡萄”比赛活动，最后取十人进入决赛，工作人员编制了如下Visual Basic程序，功能是根据葡萄串数进行排序，程序中所有参赛者的成绩保存在数组m中，对应的姓名保存在数组name中。
程序运行界面如图所示，左边列表框List1中显示数据（成绩和姓名），单击 “开始排序”按钮（Command1），排序后的结果按成绩从高到低显示在列表框List2中。
解决此问题的排序部分的程序段如下：
Dim m(1 To 10) As Single
Dim name(1 To 10) As String
Private Sub Command1_Click(　　)
Dim i As Integer, j As Integer, k As Integer, x As Single, y As String
For i = 1 To 9
k = i
For j = i + 1 To 10
If ① Then k = j
Next j
If k <> i Then
x = m(i) : m(i) = m(k) : ②
y = name (i) : name (i) = name (k) : name (k) = y
End If
Next I
For I = 1 To 10
List2.AddItem Str(m(i)) + " " + name(i)
Next i
End Sub
Private Sub Form_Load()
' 此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
（1）程序中①划线处应填入　 　。
（2）程序中②划线处应填入　 　。
18．（2016·杭州模拟）【加试题】某单位会员储值卡查询系统具有如下功能：输入会员卡号，即可查出该卡号对应的余额。所有会员卡号和相应的余额已分别保存在数组kh和数组ye中，第i个会员的卡号保存在kh(i)中，对应卡号的余额保存在ye(i)中，卡号从小到大排序。
程序运行界面如图所示，左边列表框List1中显示的是会员卡号和余额，在文本框Text1中输入会员卡号，单击"查询余额"按钮（Command1）后，如果找到此卡号，则在标签Label2中显示"此卡号余额为"和卡号对应的余额值，如果未找到则显示"找不到此卡号，请重新输入"。
解决此问题的部分程序段如下：
Dim kh (1 To n) As Long
Dim ye (1 To n) As Single
Private Sub Command1_Click()
Dim x As Long, i As Long, j As Long, m As Long, f As Boolean
x = Val(Text1.Text)
i = 1: j = n: f = False ‘ 设卡号总数为n
Do While ①
②
If x = kh (m) Then
f = True
ElseIf x < kh (m) Then
j = m - 1
Else
③
End If
Loop
If f Then
Label2.Caption = "此卡号余额为" + Str(ye(m)) + "元"
Else
Label2.Caption = "找不到此卡号，请重新输入"
End If
End Sub
Private Sub Form_Load()
’此过程用于对数组kh和数组ye进行初始赋值，代码略
End Sub
（1）程序中①划线处应填入　 　。
（2）程序中②划线处应填入　 　。
（3）程序中③划线处应填入　 　。
答案解析部分
1．【答案】B
【知识点】信息获取的环节与方法；信息处理的一般过程
【解析】【解答】 本题中付款时产生二维码的过程就是将产品的相关信息转换为二维码信息，以供收银员的扫码器识别。其过程属于信息的编码。故答案选B。
【分析】本题考查信息的编码。信息的采集是指对已有的信息进行收集，信息的编码是指将一种信息转换为能够被机器识别的信息，信息的发布是指将已有信息公布出去，信息加工是为了有效地利用信息而对信息采取的加工处理。
2．【答案】A
【知识点】信息资源管理的概念与目的
【解析】【解答】图中可看出该评价共有1821人参与，是由多人评价统计出来的，属于统计评价。故答案为A。
【分析】本题考查因特网信息资源的评价。评价的三种方式为统计评价、专家或核心刊物评价、个人评价。
3．【答案】D
【知识点】文本的基本编辑
【解析】【解答】通过观察可看到本文有批注[微软用户1] 和 批注[微软用户2] 两处有批注，A选项正确；从图文所示 批注[微软用户1]的内容为是Multimedia Technology，B选项正确；蓝色加下划线的“跨行业”和“综合”是被标记为“修订”格式，所以如果接受修订内容，就是显示的内容，C选项正确；批注[微软用户2] 的内容是简称HCI或HMI，所以D选项错误。故答案选D。
【分析】本题考查对word的修订、批注功能的理解。修订是指修改格式、删除或增加内容。批注是对部分文字或操作进行注解、诠释。是学生们熟练掌握的一种操作。
4．【答案】A
【知识点】表格数据的基本操作；数据表、字段、记录的概念
【解析】【解答】Access不同于EXCEL，Access数据库表中删除的记录是不能被恢复的，只有重新输入被删除的记录的内容才可以做到，所以Access中“撤销”命令及重新打开数据库或数据表是无法恢复删除的。故答案选A。
【分析】本题考查Access数据表中记录的操作。Access数据记录的删除操作有别于EXCEL工作表的删除操作，数据记录一旦删除，将无法通过撤销操作恢复。
5．【答案】B
【知识点】算法的常用表示方法；算法的控制结构
【解析】【解答】通过观察本题流程图是循环结构，用户输入S的值，通过判断I的值，I<=6时进入循环体，当I＝7时才输出S的值，选项A不正确；循环体的语句是s=s+s*i 和i=i+1，选项B正确；本程序是典型的循环结构图，程序没有出错，选项C错误；循环语句s=s+s*i执行的次数由i的值决定，执行了6次，不是1次，所以选项D错误。故答案选B。
【分析】本题考查算法的流程图识读。流程图的基本图形及功能和流程图的三种基本结构：顺序结构、选择结构和循环结构，学生应该掌握三种结构的特点灵活解答。
6．【答案】D
【知识点】运算符、基本运算与表达式
【解析】【解答】在ASCII表中，大写字母排列在小写字母之前，故字符"A"的ASCII小于字符"a"的ASCII值，故A选项的值为True；表达式Int( Rnd * 49 )的取值范围是[0,48]，小于49，故B选项正确；C选项表达式"3+4 <= 7"的值为True，"5+6 > 9"的值为True，True and True的值为True；D选项为比较两个字符串的大小，字符串第二个字符"h" < "w"，故字符串"thirty"应小于"two"。故答案选D。
【分析】本题考查VB表达式及VB常用函数。ASCII码比较大小时，顺序为0~97．【答案】A
【知识点】信息的编码；进制及数制转换
【解析】【解答】十六进制转十进制，转换方法为位权法，即DAH＝13*161+10*160＝218，70H=7*161+0*160＝112。故答案选A 。
【分析】本题考查信息编码、进制转换和RGB色彩模式。进制间的转换：十转十六是除十六取余法，十六进制转十进制是按权展开法 。RGB色彩模式是工业界的一种颜色标准，是通过对红R、绿G、蓝B三个颜色通道的变化及叠加得到各种颜色。
8．【答案】A
【知识点】图片加工常用工具的使用
【解析】【解答】从图A到图B的对比可以看出，水平方向变了，即进行一次水平翻转再进行裁剪。故答案选A。
【分析】本题考查图像的基本操作。PS中的翻转功能可以实现图片的水平翻转和垂直翻转。要求学生对图像的裁剪、翻转有一定的理解。
9．【答案】B
【知识点】动画的实现
【解析】【解答】 小峰制作某flash作品“老人与狗”时的截图如图所示，从图中可知，“小狗”图层中的小狗图片仅在第1帧到第15帧出现，若要使小狗图片一直延续到第40帧， 有两种办法：一是将关键帧放到第40帧，二是将关键帧进行清除。故答案选B。
【分析】本题考查flash中帧的基本操作。帧可以分为普通帧、关键帧和空白关键帧，普通帧一般用来延续上一关键帧的图像或在两个关键帧之间实现补间动画，而关键帧是用于放置关键点变化的图像，空白关键帧用于图像的清除和不显示，帧的操作有插入帧、插入关键帧、插入空白关键帧、删除帧（关键帧、空白关键帧）、清除关键帧、清除空白关键帧、帧命名等操作。
10．【答案】A
【知识点】声音、图像、视频编码
【解析】【解答】本题意图考核声音的存储容量以及数据压缩技术的相关知识。该音频的存储容量是904132B=882.9KB，数据压缩比=压缩前文件信息量/压缩后文件信息量，882.9 KB /73.5 KB=12:1。故本题答案选A。
【分析】本题考查的是音频文件存储容量的计算。音频文件存储容量=(采样频率× 采样位数× 声道数× 时间) / 8，单位为字节。
11．【答案】D
【知识点】查找算法及程序实现
【解析】【解答】在规模为n的数中查找一个数据时至多进行Log2n+1次查找就能得到结果。本题中最多查找15次，故最多花费时间为15*8=120毫秒。故答案选D。
【分析】本题考查的是对分法的最多查找次数。使用对分法最坏（次数最多）运算次数计算公式为：最多查找次数=Log2n+1（次）。
12．【答案】B
【知识点】解析算法及程序实现
【解析】【解答】本题程序分析如下：
Function f(n as integer) as long ‘自定义函数f开始部分，其中参数n为整型，表示要计算的自然数。
Dim j As Integer ‘定义一个整型变量j
f=1 ‘设函数的初始值f的值为1
For j=1 to n ‘使用j来控制循环，j值为1到n
f=f*j ‘函数f相当于累乘器，将j的值累乘到f中，f最终为n的阶乘
Next j ‘结束循环
End Function ‘结束自定义函数
Private Sub Command1_Click() ‘命令按钮1单击事件开始
Dim s As Long, i AS Integer ‘定义长整型变量s和整型变量i
S=0 ‘s为累加器用于累加i的阶乘
For i=1 to 6 ‘使用i来控制循环，i从1变到6
_______________________ ‘本处要使用自定义函数f计算i的阶乘并将i的阶乘累加到s中，故此处应填写： s=s+f(i)
Next i ‘结束循环
Text1.text=str(s) ‘将阶乘之和s转为字符型并在文本框1中输出
End Sub ‘结束命令按钮单击事件过程
由上述分析知在划线处应使用自定义函数f计算i的阶乘并将i的阶乘累加到s中，故此处应填写： s=s+f(i) 。故答案选B。
【分析】本题考查的是学生对自定义函数调用的应用以及程序阅读并完成填空的能力。在本题中注意自定义函数的定义和引用，注意参数的类型及函数值的类型，不要在引用过程中出现类型不匹配等错误，另外还有一个编程技巧是累乘器s的运用。
13．【答案】（1）=（E3-D3）/D3*100 或=F3/D3*100
（2）A2:A16, D2:E16
（3）4；会
【知识点】表格数据的基本操作；表格数据的处理与计算
【解析】【解答】（1）根据涨跌幅的公式 涨跌幅=（本期价格-上期价格）/上期价格*100) ，故答案为： =（E3-D3）/D3*100。
（2）通过题意，所需要数据源应该由商品（大米到油菜）区域即A2：A16，上期价格和本期价格区域即D2：E16，故答案为： A2:A16,D2:E16。
（3）自定义条件为本期价格介于20~60之间的数据，观察图表有E6、E9、E11、E12这4个满足条件；筛选后有些数据被隐藏，图表的数据也会被隐藏。故答案为：4 、会。
【分析】本题考查Excel中单元格的公式的应用、根据图表数据选择数据源区域、数据的筛选及数据源的数据变动会影响图表。
14．【答案】（1）B；caption
（2）Val(Text1.Text)；Label4.Caption；End If
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；算法的控制结构；解析算法及程序实现
【解析】【解答】（1）由图可知，“请输入您猜的价格：”对象为一个标签，而A为文本框、B为标签、C为命令按钮、D为列表框，故本小题第一空应选填B。若想设置标签显示的文字需要设置标签的标题属性。故本小题第二个空应填写：Caption。
（2）本题程序分析如下：
Private Sub Command1_Click() ‘命令按钮单击事件过程开始
Dim g As Integer ‘定义整型变量g
Dim p As Integer ‘定义整型变量p
p = 99 ‘ '预设价格的值存储到p变量中
‘从文本框1中获取输入的价格并转为数值型并赋给变量g，所以本处应填写： Val(Text1.Text)
g =
If g > p Then ‘如果输入的值大于了预设值则作如下处理
= "对不起，偏高了！" ‘在标签4中输出偏高信息，故应填写： Label4.Caption
ElseIf g < p Then ‘如果输入的值小于了预设值则作如下处理
Label4.Caption = "对不起，偏低了！" ‘在标签4中输出猜测价格偏低信息
Else ‘ 在上述两种情况都不成立时（即猜对价格时）作如下处理
Label4.Caption = "恭喜你，猜对啦！" ‘ 使用标签4输出猜对信息
‘结束条件判断，故此处应填写：End if
End Sub '结束事件过程
由以上分析知：1处从文本框1中获取输入的价格并转为数值型并赋给变量g，所以本处应填写： Val(Text1.Text) 。
2处在标签4中输出偏高信息，故应填写： Label4.Caption 。
3处结束条件判断，故此处应填写：End if。
【分析】本题考查的是VB界面的设计和解析算法的理解和应用。本题的结构是一个使用if……then……elseif……else……endif实现的多分支选择结构；另外本题也对对象使用的控件和属性的设置也进行了考查。
15．【答案】（1）C
（2）书香家庭
（3）水平翻转
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】（1）选项A图像大小是调整整个图像的大小不是调某个图层的大小；选项B裁剪工具是截取图像的一部分；选项C自由变换工具可以调整图层中图像的大小和长宽比例，故答案为C。
（2）由图3可知在“书香家族”图层有一个fx标记，说明该图层应用了样式，故答案为：书香家庭“
（3）对比图1中蘑菇.jpg中的图像和图2中蘑菇中的图像发现它们是相对的，故实现其操作的方法是将蘑菇.jpg拷贝到蘑菇图层并进行”水平翻转“操作，故答案为： 水平翻转
【分析】本题考查的是对photoshop软件对图层的基本操作和图层属性的标记。调整某一图层的大小使用编辑菜单中的 “变换”—>“缩放”工具（或“自由变换”工具）。不同的图层在Photoshop中有不同的标记，如设置了样式则其后有一个fx标记，如果图层为一个文本图层则其图标上有一个T字，若锁定了图层则会出现一把小锁等。
16．【答案】（1）2；7.5
（2）影片剪辑
（3）动画
（4）on(release){fscommand(“quit”);}
【知识点】动画的实现；场景的编辑；常用影片控制函数的应用
【解析】【解答】（1）由图1可知，该影片共有两个场景，分别是“封面”和“生日快乐”，帧频为15fps, 要使当前场景播放时间延长为原来的两倍，应将播放速度减慢为原来的一半，故帧频应改为15fps/2=7.5 fps；故答案为：2，7.5。
（2）元件一共分为三类，由图2可知，“礼花-mv”的元件类型为影片剪辑，故答案为：影片剪辑。
（3）在两个关键帧之间创建动画，而且没有涉及形状的改变，只是右上角向信封中间位置移动，制作动画补间即可。故答案为：动画。
（4）题干中指出了由用户单击“退出”按钮关闭窗口，则语句出现在on处理函数中。故答案为： on(release){fscommand(“quit”);} 。
【分析】本题考查Flash操作的相关知识：动画播放时间的计算、元件类型、动画补间类型及动作脚本。动画播放时间等于总帧数除以帧频；元件共有形状、按钮和影片剪辑三种类型。补间动画有二种：动画补间和形状补间。形状补间是由一个物体到另一个物体间的变化过程，像由三角形变成四方形等。时间轴上形状补间是淡绿色底加一个黑色箭头组成的。动画补间是由一个形态到另一个形态的变化过程，像移动位置，改变角度等。时间轴上动画补间是淡紫色底加一个黑色箭头组成的。为了实现动画的交互功能可以设置动画的动作脚本。
17．【答案】（1）m(j)>m(k)
（2）m(k)=x
【知识点】排序算法及程序实现
【解析】【解答】本题程序分析如下：
Dim m(1 To 10) As Single ’定义窗体级单精度数组m用于存放摘的葡萄数
Dim name(1 To 10) As String ‘定义窗体级字符串数组用于存放队员的姓名
Private Sub Command1_Click(　　) ‘命令按钮单击事件过程开始
Dim i As Integer, j As Integer, k As Integer, x As Single, y As String ‘定义整型变量i、j、k和单精度变量x及字符型变量y
For i = 1 To 9 ‘使用i来控制外层循环用于表示比较的轮数
k = i ‘假设最大数组元素值的下标为每轮第一个元素的下标并放于变量k中
For j = i + 1 To 10 ‘使用j来控制内层循环，表示每轮比较的次数
If ① Then k = j ‘如果数组元素m（j）比标记的数组元素大，则改变最大数组元素的下标并放于变量k中，即m（k）始终为每轮比较的最大值，故此处应填写：m(j)>m(k)
Next j ‘结束内层循环
If k <> i Then ‘如果在每轮比较后标记的最大元素的下标与每轮的第一个元素的下标不相等，则作如下处理
x = m(i) : m(i) = m(k) : ② ‘借助第三变量x交换最大元素和每轮第一个元素的值，故此处应填写： m(k)=x
y = name (i) : name (i) = name (k) : name (k) = y ‘借助第三变量交换与之相对应的队员的姓名
End If ‘结束条件判断
Next I ‘结束外层循环
For I = 1 To 10 ‘使用i来控制循环i代表了列表框的每一列
List2.AddItem Str(m(i)) + " " + name(i) ‘在列表框的一列中输出采摘的葡萄数和相对应的队员的姓名
Next i ‘结束循环
End Sub ‘结束命令按钮1单击事件过程
Private Sub Form_Load()
' 此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
由以上程序分析知： 程序中①处如果数组元素m（j）比标记的数组元素大，则改变最大数组元素的下标并放于变量k中，即m（k）始终为每轮比较的最大值，故此处应填写：m(j)>m(k)。
程序中②划线处借助第三变量x交换最大元素和每轮第一个元素的值，故此处应填写： m(k)=x 。
【分析】本题考查的是选择排序算法的综合应用能力。简单选择排序的基本思想：第1趟，在待排序记录r[1]~r[n]中选出最小的记录，将它与r[1]交换；第2趟，在待排序记录r[2]~r[n]中选出最小的记录，将它与r[2]交换；以此类推，第i趟在待排序记录r[i]~r[n]中选出最小的记录，将它与r[i]交换，使有序序列不断增长直到全部排序完毕。
18．【答案】（1）(i <= j) And Not f
（2）m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2)
（3）i=m+1
【知识点】查找算法及程序实现
【解析】【解答】
本题程序分析如下：
Dim kh (1 To n) As Long ’定义一个窗体级长整型数组kh
Dim ye (1 To n) As Single ‘定义一个窗体级单精度型数组ye
Private Sub Command1_Click() ‘命令按钮1单击事件过程开始
‘定义长整型变量x、i、j、m和布尔型变量f
Dim x As Long, i As Long, j As Long, m As Long, f As Boolean
x = Val(Text1.Text) ‘将文本框1中输入的数据转为数值型并赋给变量x
i = 1: j = n: f = False ‘ 初始化变量i、j和f，设卡号总数为n
Do While ① ‘在i值小于j且标记变量f的值为false时进行循环，故此处应填写： (i <= j) And Not f
②
‘使用对分法进行查找，此处为计算中间元素的下标，故此处应填写： m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2)
If x = kh (m) Then ‘如果中间数组元素的值就是要查找的值则作如下处理
f = True ‘设置标记变量的值为True
ElseIf x < kh (m) Then ‘如果要查找的数比中间数组元素的值小则作如下处理
j = m - 1 ‘改变要查找数组元素的下标上限为中间数组元素的下标小1
Else ‘其他情况（即要查找的数比中间数组元素的值小)时作如下处理
③ ‘改变要查找数组元素的下标下限为中间数组元素的下标加1，故此处应填写：i=m+1
End If ‘结束条件判断
Loop ‘结束循环
If f Then ‘如果f的值为True由作如下处理
Label2.Caption = "此卡号余额为" + Str(ye(m)) + "元" ‘在标签2中输出此卡的余额
Else ‘如果f的值为False时由作如下处理
Label2.Caption = "找不到此卡号，请重新输入" ‘ 在标签2中输出找不到此卡
End If ‘结束条件判断
End Sub ‘结束事件过程
Private Sub Form_Load()
’此过程用于对数组kh和数组ye进行初始赋值，代码略
End Sub
由以上程序分析知： 程序中①划线处在i值小于j且标记变量f的值为false时进行循环，故此处应填写： (i <= j) And Not f 。
程序中②划线处使用对分法进行查找，此处为计算中间元素的下标，故此处应填写： m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2) 。
程序中③划线处改变要查找数组元素的下标下限为中间数组元素的下标加1，故此处应填写：i=m+1。
【分析】本题考查对分查找算法的综合应用能力。对分法查找过程是先将一个数列放于一个有序数组中，然后比较中间数组元素的值与要查找的值，或中间数组的值比要查找的值大，则在前半个数组中查找，若中间数组的值比要查找的值小则在后半个数组中查找。查找方法仍是比较中间数组元素的值和要查找的值。以此类推直到查到或下限大于了上限（没查找）为止。
1 / 1浙江省杭州市2016年信息技术高考模拟卷十四
一、选择题
1．（2016·杭州模拟）支付宝扫码支付是一种新型的付款方式。付款时只需给收银员扫一下支付码就可以完成支付。支付宝付款码产生过程属于（　　）
A．信息的采集 B．信息的编码 C．信息的发布 D．信息的表达
【答案】B
【知识点】信息获取的环节与方法；信息处理的一般过程
【解析】【解答】 本题中付款时产生二维码的过程就是将产品的相关信息转换为二维码信息，以供收银员的扫码器识别。其过程属于信息的编码。故答案选B。
【分析】本题考查信息的编码。信息的采集是指对已有的信息进行收集，信息的编码是指将一种信息转换为能够被机器识别的信息，信息的发布是指将已有信息公布出去，信息加工是为了有效地利用信息而对信息采取的加工处理。
2．（2016·杭州模拟）某网店的评价情况如图所示,则该评价属于（　　）
A．统计评价 B．专家评价
C．个人推荐 D．核心刊物评价
【答案】A
【知识点】信息资源管理的概念与目的
【解析】【解答】图中可看出该评价共有1821人参与，是由多人评价统计出来的，属于统计评价。故答案为A。
【分析】本题考查因特网信息资源的评价。评价的三种方式为统计评价、专家或核心刊物评价、个人评价。
3．（2016·杭州模拟）小张使用Word软件编辑文档时的部分截图如第3题图所示。则下列说法不正确的是（　　）
A．共有2处批注
B．批注[微软用户1]的内容为：Multimedia Technology
C．若全部接受图中所示的修订内容，则第一句话的文字将变为:“多媒体技术是一门多学科交叉、跨行业渗透的综合技术。”
D．批注[微软用户2]的内容为：人机交互
【答案】D
【知识点】文本的基本编辑
【解析】【解答】通过观察可看到本文有批注[微软用户1] 和 批注[微软用户2] 两处有批注，A选项正确；从图文所示 批注[微软用户1]的内容为是Multimedia Technology，B选项正确；蓝色加下划线的“跨行业”和“综合”是被标记为“修订”格式，所以如果接受修订内容，就是显示的内容，C选项正确；批注[微软用户2] 的内容是简称HCI或HMI，所以D选项错误。故答案选D。
【分析】本题考查对word的修订、批注功能的理解。修订是指修改格式、删除或增加内容。批注是对部分文字或操作进行注解、诠释。是学生们熟练掌握的一种操作。
4．（2016·杭州模拟）在Access软件中，删除“学业水平考试成绩”数据表中的“学号”值为“20104”记录时的界面如图所示：
单击“是（Y）”按钮删除指定记录后，下列操作能恢复被删除记录数据的是（　　）
①重新输入被删除的记录的内容 ② 立即执行“撤销”命令
③ 关闭当前数据库，重新打开 ④ 关闭该数据表，重新打开
A．① B．② C．①② D．③④
【答案】A
【知识点】表格数据的基本操作；数据表、字段、记录的概念
【解析】【解答】Access不同于EXCEL，Access数据库表中删除的记录是不能被恢复的，只有重新输入被删除的记录的内容才可以做到，所以Access中“撤销”命令及重新打开数据库或数据表是无法恢复删除的。故答案选A。
【分析】本题考查Access数据表中记录的操作。Access数据记录的删除操作有别于EXCEL工作表的删除操作，数据记录一旦删除，将无法通过撤销操作恢复。
5．（2016·杭州模拟）某算法流程图如图所示, 执行该算法，当i的值为6时，下列说法正确的是（　　）
A．输出s的值
B．执行语句s=s+s*i和i=i+1
C．程序出错
D．语句s=s+s*i已经执行了1次
【答案】B
【知识点】算法的常用表示方法；算法的控制结构
【解析】【解答】通过观察本题流程图是循环结构，用户输入S的值，通过判断I的值，I<=6时进入循环体，当I＝7时才输出S的值，选项A不正确；循环体的语句是s=s+s*i 和i=i+1，选项B正确；本程序是典型的循环结构图，程序没有出错，选项C错误；循环语句s=s+s*i执行的次数由i的值决定，执行了6次，不是1次，所以选项D错误。故答案选B。
【分析】本题考查算法的流程图识读。流程图的基本图形及功能和流程图的三种基本结构：顺序结构、选择结构和循环结构，学生应该掌握三种结构的特点灵活解答。
6．（2016·杭州模拟）下列逻辑表达式中，值为False的是（　　）
A．Asc("A") < Asc("a") B．Int( Rnd * 49 ) < 49
C．3+4 <= 7 and 5+6 > 9 D．"thirty" > "two"
【答案】D
【知识点】运算符、基本运算与表达式
【解析】【解答】在ASCII表中，大写字母排列在小写字母之前，故字符"A"的ASCII小于字符"a"的ASCII值，故A选项的值为True；表达式Int( Rnd * 49 )的取值范围是[0,48]，小于49，故B选项正确；C选项表达式"3+4 <= 7"的值为True，"5+6 > 9"的值为True，True and True的值为True；D选项为比较两个字符串的大小，字符串第二个字符"h" < "w"，故字符串"thirty"应小于"two"。故答案选D。
【分析】本题考查VB表达式及VB常用函数。ASCII码比较大小时，顺序为0~97．（2016·杭州模拟）红色的RGB值为RGB（255,0,0），若用十六进制表示则为#FF0000H；粉红色的RGB值为RGB（255,192,203），若用十六进制表示则为#FFC0CBH。则用十六进制表示的颜色#DADA70H对应的RGB值为(　　)
A．RGB（218,218,112） B．RGB（216,216,110）
C．RGB（220,220,115） D．RGB（217,217,110）
【答案】A
【知识点】信息的编码；进制及数制转换
【解析】【解答】十六进制转十进制，转换方法为位权法，即DAH＝13*161+10*160＝218，70H=7*161+0*160＝112。故答案选A 。
【分析】本题考查信息编码、进制转换和RGB色彩模式。进制间的转换：十转十六是除十六取余法，十六进制转十进制是按权展开法 。RGB色彩模式是工业界的一种颜色标准，是通过对红R、绿G、蓝B三个颜色通道的变化及叠加得到各种颜色。
8．（2016·杭州模拟）在photoshop中，利用了哪些操作处理图A，得到图B（　　）
A．水平翻转 剪裁 B．垂直翻转 剪裁
C．水平翻转 缩放 D．垂直翻转 缩放
【答案】A
【知识点】图片加工常用工具的使用
【解析】【解答】从图A到图B的对比可以看出，水平方向变了，即进行一次水平翻转再进行裁剪。故答案选A。
【分析】本题考查图像的基本操作。PS中的翻转功能可以实现图片的水平翻转和垂直翻转。要求学生对图像的裁剪、翻转有一定的理解。
9．（2016·杭州模拟）小峰制作某flash作品“老人与狗”时的截图如图所示，从图中可知，“小狗”图层中的小狗图片仅在第1帧到第15帧出现，若要使小狗图片一直延续到第40帧，可在该图层的第16帧上进行的操作是（　　）
A．删除帧 B．清除关键帧 C．清除帧 D．剪切帧
【答案】B
【知识点】动画的实现
【解析】【解答】 小峰制作某flash作品“老人与狗”时的截图如图所示，从图中可知，“小狗”图层中的小狗图片仅在第1帧到第15帧出现，若要使小狗图片一直延续到第40帧， 有两种办法：一是将关键帧放到第40帧，二是将关键帧进行清除。故答案选B。
【分析】本题考查flash中帧的基本操作。帧可以分为普通帧、关键帧和空白关键帧，普通帧一般用来延续上一关键帧的图像或在两个关键帧之间实现补间动画，而关键帧是用于放置关键点变化的图像，空白关键帧用于图像的清除和不显示，帧的操作有插入帧、插入关键帧、插入空白关键帧、删除帧（关键帧、空白关键帧）、清除关键帧、清除空白关键帧、帧命名等操作。
10．（2016·杭州模拟）【加试题】某同学使用Windows附件中的“录音机”程序录制了一段音频，尚未保存，在查看其属性时得到如图所示的信息。压缩成mp3格式后的文件大小为73.5KB,则其压缩比约为（　　）
A．12:1 B．11:1 C．1:12 D．1:11
【答案】A
【知识点】声音、图像、视频编码
【解析】【解答】本题意图考核声音的存储容量以及数据压缩技术的相关知识。该音频的存储容量是904132B=882.9KB，数据压缩比=压缩前文件信息量/压缩后文件信息量，882.9 KB /73.5 KB=12:1。故本题答案选A。
【分析】本题考查的是音频文件存储容量的计算。音频文件存储容量=(采样频率× 采样位数× 声道数× 时间) / 8，单位为字节。
11．（2016·杭州模拟）【加试题】某高校学籍管理系统软件有2万个学生的电子档案（已按学籍号排序），假设从中取出一条记录并与待查项进行比较所花时间为8毫秒，则用对分法在该系统中查找任意一位学生档案最多花费的时间约为（　　）。
A．16万毫秒 B．8万毫秒 C．10毫秒 D．120毫秒
【答案】D
【知识点】查找算法及程序实现
【解析】【解答】在规模为n的数中查找一个数据时至多进行Log2n+1次查找就能得到结果。本题中最多查找15次，故最多花费时间为15*8=120毫秒。故答案选D。
【分析】本题考查的是对分法的最多查找次数。使用对分法最坏（次数最多）运算次数计算公式为：最多查找次数=Log2n+1（次）。
12．（2016·杭州模拟）自定义函数f的功能是计算自然数n的阶乘值，即f=n！。下面VB程序通过调用函数来计算S=1!+2!+3!+4!+5!+6!:
Function f(n as integer) as long
Dim j As Integer
f=1
For j=1 to n
f=f*j
Next j
End Function
Private Sub Command1_Click()
Dim s As Long, AS Integer
S=0
For i=1 to 6
Next i
Text1.text=str(s)
End Sub
方框中正确的语句是 （　　）
A．s=f(i) B．s=s+f(i) C．s=f(n) D．s=s+f(n)
【答案】B
【知识点】解析算法及程序实现
【解析】【解答】本题程序分析如下：
Function f(n as integer) as long ‘自定义函数f开始部分，其中参数n为整型，表示要计算的自然数。
Dim j As Integer ‘定义一个整型变量j
f=1 ‘设函数的初始值f的值为1
For j=1 to n ‘使用j来控制循环，j值为1到n
f=f*j ‘函数f相当于累乘器，将j的值累乘到f中，f最终为n的阶乘
Next j ‘结束循环
End Function ‘结束自定义函数
Private Sub Command1_Click() ‘命令按钮1单击事件开始
Dim s As Long, i AS Integer ‘定义长整型变量s和整型变量i
S=0 ‘s为累加器用于累加i的阶乘
For i=1 to 6 ‘使用i来控制循环，i从1变到6
_______________________ ‘本处要使用自定义函数f计算i的阶乘并将i的阶乘累加到s中，故此处应填写： s=s+f(i)
Next i ‘结束循环
Text1.text=str(s) ‘将阶乘之和s转为字符型并在文本框1中输出
End Sub ‘结束命令按钮单击事件过程
由上述分析知在划线处应使用自定义函数f计算i的阶乘并将i的阶乘累加到s中，故此处应填写： s=s+f(i) 。故答案选B。
【分析】本题考查的是学生对自定义函数调用的应用以及程序阅读并完成填空的能力。在本题中注意自定义函数的定义和引用，注意参数的类型及函数值的类型，不要在引用过程中出现类型不匹配等错误，另外还有一个编程技巧是累乘器s的运用。
二、非选择题
13．（2016·杭州模拟）小李收集了2015年某月食品价格变动的一些数据，并用Excel软件对部分食品价格变动的数据进行了分析，界面如1图所示，请回答下列问题。
（1）正确计算各种商品的涨跌幅，需在G3单元格输入公式　 　，并从G3单元格自动填充到G20单元格。 (提示：涨跌幅=（本期价格-上期价格）/上期价格*100)
（2）为更加直观地比较各类商品的价格波动情况，小李制作了如2图所示的图表。则该图表的数据区域是　 　。
（3）选中A2:G20区域，按照3图所示进行自定义筛选后，将显示　 　个数据。筛选完毕后，2图所示的图表　 　(填：会或不会)发生变化。
【答案】（1）=（E3-D3）/D3*100 或=F3/D3*100
（2）A2:A16, D2:E16
（3）4；会
【知识点】表格数据的基本操作；表格数据的处理与计算
【解析】【解答】（1）根据涨跌幅的公式 涨跌幅=（本期价格-上期价格）/上期价格*100) ，故答案为： =（E3-D3）/D3*100。
（2）通过题意，所需要数据源应该由商品（大米到油菜）区域即A2：A16，上期价格和本期价格区域即D2：E16，故答案为： A2:A16,D2:E16。
（3）自定义条件为本期价格介于20~60之间的数据，观察图表有E6、E9、E11、E12这4个满足条件；筛选后有些数据被隐藏，图表的数据也会被隐藏。故答案为：4 、会。
【分析】本题考查Excel中单元格的公式的应用、根据图表数据选择数据源区域、数据的筛选及数据源的数据变动会影响图表。
14．（2016·杭州模拟）小兰设计了一个“猜价格”小游戏，用户在Text1中输入所猜的价格，单击“猜一猜”按钮，如果偏高了，Label4标签中将提示“对不起，偏高了！”；若所猜的价格偏低，则Label4标签中将提示“对不起，偏低了！”；若猜中，则Label4标签中将显示“恭喜你，猜对啦！”。界面如1图所示。
（1）应用程序界面设计时，为添加“请输入您猜的价格：”对象，应使用第14题-2图所示的“控件工具箱”中的　 　（填写相应字母），并在3图所示的“属性窗口”中，将　 　属性值设置为“请输入您猜的价格：”。
（2）解决此问题的相应程序如下，请根据题意将程序补充完整。
Private Sub Command1_Click()
Dim g As Integer
Dim p As Integer
p = 99 '预设价格的值存储到p变量中
g = 　 　
If g > p Then
　 　= "对不起，偏高了！"
ElseIf g < p Then
Label4.Caption = "对不起，偏低了！"
Else
Label4.Caption = "恭喜你，猜对啦！"
　 　
End Sub
【答案】（1）B；caption
（2）Val(Text1.Text)；Label4.Caption；End If
【知识点】类、对象、属性、方法、事件和事件处理的概念及应用；算法的控制结构；解析算法及程序实现
【解析】【解答】（1）由图可知，“请输入您猜的价格：”对象为一个标签，而A为文本框、B为标签、C为命令按钮、D为列表框，故本小题第一空应选填B。若想设置标签显示的文字需要设置标签的标题属性。故本小题第二个空应填写：Caption。
（2）本题程序分析如下：
Private Sub Command1_Click() ‘命令按钮单击事件过程开始
Dim g As Integer ‘定义整型变量g
Dim p As Integer ‘定义整型变量p
p = 99 ‘ '预设价格的值存储到p变量中
‘从文本框1中获取输入的价格并转为数值型并赋给变量g，所以本处应填写： Val(Text1.Text)
g =
If g > p Then ‘如果输入的值大于了预设值则作如下处理
= "对不起，偏高了！" ‘在标签4中输出偏高信息，故应填写： Label4.Caption
ElseIf g < p Then ‘如果输入的值小于了预设值则作如下处理
Label4.Caption = "对不起，偏低了！" ‘在标签4中输出猜测价格偏低信息
Else ‘ 在上述两种情况都不成立时（即猜对价格时）作如下处理
Label4.Caption = "恭喜你，猜对啦！" ‘ 使用标签4输出猜对信息
‘结束条件判断，故此处应填写：End if
End Sub '结束事件过程
由以上分析知：1处从文本框1中获取输入的价格并转为数值型并赋给变量g，所以本处应填写： Val(Text1.Text) 。
2处在标签4中输出偏高信息，故应填写： Label4.Caption 。
3处结束条件判断，故此处应填写：End if。
【分析】本题考查的是VB界面的设计和解析算法的理解和应用。本题的结构是一个使用if……then……elseif……else……endif实现的多分支选择结构；另外本题也对对象使用的控件和属性的设置也进行了考查。
15．（2016·杭州模拟）某学校组织“书香家庭”评比活动，小强用Photoshop制作了主题为“书香家庭”的小报参加评比。部分素材如1图所示，当前编辑窗口如2图所示。
请回答下列问题：
（1）小强将“小孩.jpg”图片复制到“小孩”图层后，发现小孩图片太大，请你帮助小强解决这个问题,请选择操作需要使用的工具 （
A．图像大小 B．裁剪工具 C．自由变换）
（2）观察图层窗口（如3图所示），设置了图层样式的图层名称是　 　。
（3）将“蘑菇.jpg”图片拷贝到蘑菇图层，执行　 　操作，可得到2图左下角所示的蘑菇效果。
【答案】（1）C
（2）书香家庭
（3）水平翻转
【知识点】图片加工常用工具的使用；图层及图层的基本操作
【解析】【解答】（1）选项A图像大小是调整整个图像的大小不是调某个图层的大小；选项B裁剪工具是截取图像的一部分；选项C自由变换工具可以调整图层中图像的大小和长宽比例，故答案为C。
（2）由图3可知在“书香家族”图层有一个fx标记，说明该图层应用了样式，故答案为：书香家庭“
（3）对比图1中蘑菇.jpg中的图像和图2中蘑菇中的图像发现它们是相对的，故实现其操作的方法是将蘑菇.jpg拷贝到蘑菇图层并进行”水平翻转“操作，故答案为： 水平翻转
【分析】本题考查的是对photoshop软件对图层的基本操作和图层属性的标记。调整某一图层的大小使用编辑菜单中的 “变换”—>“缩放”工具（或“自由变换”工具）。不同的图层在Photoshop中有不同的标记，如设置了样式则其后有一个fx标记，如果图层为一个文本图层则其图标上有一个T字，若锁定了图层则会出现一把小锁等。
16．（2016·杭州模拟） 小张用Flash软件制作一个主题为生日快乐的的Flash动画，界面如1图所示，库信息如2图所示。请回答以下问题：
（1）由1图所示可知，该动画共有　 　个场景，要使当前场景播放时间延长为原来的两倍，则应将帧频调整为　 　fps。
（2）由2图所示可见名称为“礼花-mv”的元件类型是　 　。
（3）为实现让“祝你生日快乐”从右上角向信封中间位置移动并旋转一次的效果，将“文字”元件置于“文字”图层第40帧的舞台右上角，在“文字”图层第60帧处应插入一个关键帧，并将“文字”元件实例移动到信封中间的位置，然后在“文字”图层创建一个　 　 （填：动画/形状）补间。
（4）最后出现“退出”按钮，单击“退出”按钮关闭窗口，则在该按钮上设置的动作命令是　 　
【答案】（1）2；7.5
（2）影片剪辑
（3）动画
（4）on(release){fscommand(“quit”);}
【知识点】动画的实现；场景的编辑；常用影片控制函数的应用
【解析】【解答】（1）由图1可知，该影片共有两个场景，分别是“封面”和“生日快乐”，帧频为15fps, 要使当前场景播放时间延长为原来的两倍，应将播放速度减慢为原来的一半，故帧频应改为15fps/2=7.5 fps；故答案为：2，7.5。
（2）元件一共分为三类，由图2可知，“礼花-mv”的元件类型为影片剪辑，故答案为：影片剪辑。
（3）在两个关键帧之间创建动画，而且没有涉及形状的改变，只是右上角向信封中间位置移动，制作动画补间即可。故答案为：动画。
（4）题干中指出了由用户单击“退出”按钮关闭窗口，则语句出现在on处理函数中。故答案为： on(release){fscommand(“quit”);} 。
【分析】本题考查Flash操作的相关知识：动画播放时间的计算、元件类型、动画补间类型及动作脚本。动画播放时间等于总帧数除以帧频；元件共有形状、按钮和影片剪辑三种类型。补间动画有二种：动画补间和形状补间。形状补间是由一个物体到另一个物体间的变化过程，像由三角形变成四方形等。时间轴上形状补间是淡绿色底加一个黑色箭头组成的。动画补间是由一个形态到另一个形态的变化过程，像移动位置，改变角度等。时间轴上动画补间是淡紫色底加一个黑色箭头组成的。为了实现动画的交互功能可以设置动画的动作脚本。
17．（2016·杭州模拟）某社区进行“摘葡萄”比赛活动，最后取十人进入决赛，工作人员编制了如下Visual Basic程序，功能是根据葡萄串数进行排序，程序中所有参赛者的成绩保存在数组m中，对应的姓名保存在数组name中。
程序运行界面如图所示，左边列表框List1中显示数据（成绩和姓名），单击 “开始排序”按钮（Command1），排序后的结果按成绩从高到低显示在列表框List2中。
解决此问题的排序部分的程序段如下：
Dim m(1 To 10) As Single
Dim name(1 To 10) As String
Private Sub Command1_Click(　　)
Dim i As Integer, j As Integer, k As Integer, x As Single, y As String
For i = 1 To 9
k = i
For j = i + 1 To 10
If ① Then k = j
Next j
If k <> i Then
x = m(i) : m(i) = m(k) : ②
y = name (i) : name (i) = name (k) : name (k) = y
End If
Next I
For I = 1 To 10
List2.AddItem Str(m(i)) + " " + name(i)
Next i
End Sub
Private Sub Form_Load()
' 此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
（1）程序中①划线处应填入　 　。
（2）程序中②划线处应填入　 　。
【答案】（1）m(j)>m(k)
（2）m(k)=x
【知识点】排序算法及程序实现
【解析】【解答】本题程序分析如下：
Dim m(1 To 10) As Single ’定义窗体级单精度数组m用于存放摘的葡萄数
Dim name(1 To 10) As String ‘定义窗体级字符串数组用于存放队员的姓名
Private Sub Command1_Click(　　) ‘命令按钮单击事件过程开始
Dim i As Integer, j As Integer, k As Integer, x As Single, y As String ‘定义整型变量i、j、k和单精度变量x及字符型变量y
For i = 1 To 9 ‘使用i来控制外层循环用于表示比较的轮数
k = i ‘假设最大数组元素值的下标为每轮第一个元素的下标并放于变量k中
For j = i + 1 To 10 ‘使用j来控制内层循环，表示每轮比较的次数
If ① Then k = j ‘如果数组元素m（j）比标记的数组元素大，则改变最大数组元素的下标并放于变量k中，即m（k）始终为每轮比较的最大值，故此处应填写：m(j)>m(k)
Next j ‘结束内层循环
If k <> i Then ‘如果在每轮比较后标记的最大元素的下标与每轮的第一个元素的下标不相等，则作如下处理
x = m(i) : m(i) = m(k) : ② ‘借助第三变量x交换最大元素和每轮第一个元素的值，故此处应填写： m(k)=x
y = name (i) : name (i) = name (k) : name (k) = y ‘借助第三变量交换与之相对应的队员的姓名
End If ‘结束条件判断
Next I ‘结束外层循环
For I = 1 To 10 ‘使用i来控制循环i代表了列表框的每一列
List2.AddItem Str(m(i)) + " " + name(i) ‘在列表框的一列中输出采摘的葡萄数和相对应的队员的姓名
Next i ‘结束循环
End Sub ‘结束命令按钮1单击事件过程
Private Sub Form_Load()
' 此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
由以上程序分析知： 程序中①处如果数组元素m（j）比标记的数组元素大，则改变最大数组元素的下标并放于变量k中，即m（k）始终为每轮比较的最大值，故此处应填写：m(j)>m(k)。
程序中②划线处借助第三变量x交换最大元素和每轮第一个元素的值，故此处应填写： m(k)=x 。
【分析】本题考查的是选择排序算法的综合应用能力。简单选择排序的基本思想：第1趟，在待排序记录r[1]~r[n]中选出最小的记录，将它与r[1]交换；第2趟，在待排序记录r[2]~r[n]中选出最小的记录，将它与r[2]交换；以此类推，第i趟在待排序记录r[i]~r[n]中选出最小的记录，将它与r[i]交换，使有序序列不断增长直到全部排序完毕。
18．（2016·杭州模拟）【加试题】某单位会员储值卡查询系统具有如下功能：输入会员卡号，即可查出该卡号对应的余额。所有会员卡号和相应的余额已分别保存在数组kh和数组ye中，第i个会员的卡号保存在kh(i)中，对应卡号的余额保存在ye(i)中，卡号从小到大排序。
程序运行界面如图所示，左边列表框List1中显示的是会员卡号和余额，在文本框Text1中输入会员卡号，单击"查询余额"按钮（Command1）后，如果找到此卡号，则在标签Label2中显示"此卡号余额为"和卡号对应的余额值，如果未找到则显示"找不到此卡号，请重新输入"。
解决此问题的部分程序段如下：
Dim kh (1 To n) As Long
Dim ye (1 To n) As Single
Private Sub Command1_Click()
Dim x As Long, i As Long, j As Long, m As Long, f As Boolean
x = Val(Text1.Text)
i = 1: j = n: f = False ‘ 设卡号总数为n
Do While ①
②
If x = kh (m) Then
f = True
ElseIf x < kh (m) Then
j = m - 1
Else
③
End If
Loop
If f Then
Label2.Caption = "此卡号余额为" + Str(ye(m)) + "元"
Else
Label2.Caption = "找不到此卡号，请重新输入"
End If
End Sub
Private Sub Form_Load()
’此过程用于对数组kh和数组ye进行初始赋值，代码略
End Sub
（1）程序中①划线处应填入　 　。
（2）程序中②划线处应填入　 　。
（3）程序中③划线处应填入　 　。
【答案】（1）(i <= j) And Not f
（2）m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2)
（3）i=m+1
【知识点】查找算法及程序实现
【解析】【解答】
本题程序分析如下：
Dim kh (1 To n) As Long ’定义一个窗体级长整型数组kh
Dim ye (1 To n) As Single ‘定义一个窗体级单精度型数组ye
Private Sub Command1_Click() ‘命令按钮1单击事件过程开始
‘定义长整型变量x、i、j、m和布尔型变量f
Dim x As Long, i As Long, j As Long, m As Long, f As Boolean
x = Val(Text1.Text) ‘将文本框1中输入的数据转为数值型并赋给变量x
i = 1: j = n: f = False ‘ 初始化变量i、j和f，设卡号总数为n
Do While ① ‘在i值小于j且标记变量f的值为false时进行循环，故此处应填写： (i <= j) And Not f
②
‘使用对分法进行查找，此处为计算中间元素的下标，故此处应填写： m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2)
If x = kh (m) Then ‘如果中间数组元素的值就是要查找的值则作如下处理
f = True ‘设置标记变量的值为True
ElseIf x < kh (m) Then ‘如果要查找的数比中间数组元素的值小则作如下处理
j = m - 1 ‘改变要查找数组元素的下标上限为中间数组元素的下标小1
Else ‘其他情况（即要查找的数比中间数组元素的值小)时作如下处理
③ ‘改变要查找数组元素的下标下限为中间数组元素的下标加1，故此处应填写：i=m+1
End If ‘结束条件判断
Loop ‘结束循环
If f Then ‘如果f的值为True由作如下处理
Label2.Caption = "此卡号余额为" + Str(ye(m)) + "元" ‘在标签2中输出此卡的余额
Else ‘如果f的值为False时由作如下处理
Label2.Caption = "找不到此卡号，请重新输入" ‘ 在标签2中输出找不到此卡
End If ‘结束条件判断
End Sub ‘结束事件过程
Private Sub Form_Load()
’此过程用于对数组kh和数组ye进行初始赋值，代码略
End Sub
由以上程序分析知： 程序中①划线处在i值小于j且标记变量f的值为false时进行循环，故此处应填写： (i <= j) And Not f 。
程序中②划线处使用对分法进行查找，此处为计算中间元素的下标，故此处应填写： m=(i+j)\2或m=int((i+j)/2)或m=fix((i+j)/2) 。
程序中③划线处改变要查找数组元素的下标下限为中间数组元素的下标加1，故此处应填写：i=m+1。
【分析】本题考查对分查找算法的综合应用能力。对分法查找过程是先将一个数列放于一个有序数组中，然后比较中间数组元素的值与要查找的值，或中间数组的值比要查找的值大，则在前半个数组中查找，若中间数组的值比要查找的值小则在后半个数组中查找。查找方法仍是比较中间数组元素的值和要查找的值。以此类推直到查到或下限大于了上限（没查找）为止。
1 / 1

展开更多......

收起↑