浙江省杭州市2015年高考信息技术模拟卷4
试卷更新日期:2017-12-28 类型:高考模拟
一、选择题
-
1. 3月8日当天,某商家网上旗舰店搞促销优惠活动,并且可通过手机扫码进入商家店铺领取更多额度的优惠券,此扫码过程属于( )A、信息编码 B、信息采集 C、信息处理 D、信息传输2. 用UltraEdit软件观察字符内码,结果如图所示:
由图可知,“2015,高考加油!”所占字节数及“高”的内码分别是( )
A、14,B8 DF B、15,AC B8 C、16,B8 DF D、16,AC B83. 新浪网发起了2015年“最喜爱的央视春晚节目”调查,调查投票结果如图所示:则该调查结果的评价方式属于( )
A、统计评价 B、个人推荐 C、专家评价 D、核心刊物评价4. 某用户使用Word软件编辑文档,部分界面如图所示:下列说法正确的是( )
A、共有3处批注 B、有2个用户添加了批注 C、用户微软用户1添加批注的对象是“来源‘浙江在线’” D、用户微软用户2添加批注的内容为“不限选考科目占54%”5. 实现计算器上xy运算处理的算法部分流程图如图所示:下列说法正确的是( )
A、框图①中该填入的是f←x*j B、框图①中该填入的是f←f*j C、j←j+1被执行了x次 D、j←j+1被执行了y次6. 校讯通中某班学生信息用Access打开“学生数据”数据表后如图所示,下列描述中正确的是( )A、“家长号码”字段的类型应改为数值型 B、该数据表共有52条记录, 至少6个字段 C、在如图状态添加一条记录后,当前记录号为2 D、删除“班级名称”字段后,记录数也会减少一条7. 李明同学发现他的QQ农场内有很多蚊子,于是他拿起“蚊子拍”工具去“拍”蚊子,蚊子马上消失,同时人物经验值立即增加了2点,这主要体现多媒体技术的( )A、集成性 B、交互性 C、实时性 D、共享性8. 某素材库中4个未经压缩的图像文件相关信息如图所示:270×185×16
540×370×16
540×370×16
540×370×16
1.bmp
2.bmp
3.bmp
4.bmp
关于这4幅图像,下列说法不正确的是( )
A、将2.bmp图像进行一次垂直翻转即得到3.bmp图像 B、将2.bmp图像进行一次水平翻转即得到4.bmp图像 C、2.bmp文件的存储容量约为1.bmp文件的4倍 D、4个图像文件的存储容量一样大9. 某同学要制作一段社会实践活动的影片,用会声会影软件编辑采集到的视频,在两段活动视频中间插入一个“百叶窗”过渡效果,制作时包括以下操作步骤:①将素材库中的两个视频文件拖进故事板
②启动会声会影软件并新建一个项目
③创建视频文件,保存为VCD格式
④选择效果的“百叶窗”,将效果拖入到两个视频中间
⑤切换到“效果步骤”
正确的排序是( )
A、②①⑤④③ B、②①④③⑤ C、⑤②①③④ D、①⑤④③②10. 小张用GoldWave软件打开了一个声音文件,其状态栏界面如图所示,下列说法正确的是( )A、该声音文件采样频率为44100kHz B、这是一个MP3格式音频 C、这是一个单声道的音频 D、这是一个WAVE格式音频二、综合题
-
11. 图1是2014年中国主要城市GDP排行榜中排名靠前的城市。请回答下列问题:(1)、计算各城市2014年“增长率”时(增长率=增量÷2013年GDP*100),先在H3单元格中输人公式 , 然后利用自动填充功能完成其余单元格的计算。(2)、在“人口(万)”列输入数据时,发现 B3:B11单元格中显示的是“#######”而非数据(如图1所示),其原因为。(3)、对表中“人均GDP”进行筛选,当“自定义自动筛选方式”对话框中设置成如图2所示时,则其筛选条件为 , 符合条件的城市个数为。12. 生活中,许多女士喜欢穿高跟鞋,那穿高跟鞋会使人感到美吗?黄金分割能解释这个问题。人体躯干与身高比例的黄金分割点是肚脐。换句话说,这一比值越接近0.618,愈给人美之感。现按要求编写“高跟鞋的最佳之选”的VB程序(界面如下题图所示),实现如下功能: 首先,设某女躯干 a米 和身高 b米 比为g,分别从文本框Text1和Text2中输入。鞋跟高度 s(单位与 a、b 一致)从Text3中输入,那么新比值g=(a+s)/( b+s),如果g=0.618,那么鞋跟高度S的值就是最佳高度。(1)、应用程序界面设计时,为显示新比值,需在窗体中添加控件,并将它的属性值设置为空。(2)、请根据题意将下列程序补充完整。
Private Sub Command1_Click( )
Dim a As Single, b As Single,s As Single,g As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
s = Val(Text3.Text)
Label5.Caption =
End Sub
13. 儿童节前夕,小杰他妹妹幼儿园的老师向他求助,希望他帮忙设计一张儿童节活动海报,于是他用Photoshop软件设计制作了一张以“彩虹乐园”为主题的活动海报,他当前编辑窗口如图所示。请回答下列问题:
(1)、如图,给“绿都花城幼儿园”图层中通过(填① 或② )工具在A处添加文字“绿都花城幼儿园”,并通过执行操作把该图层设置成跟“彩虹乐园”图层一样的样式。(2)、对B处“天鹅”图层执行操作,然后再进行“水平翻转”和调整位置后可得到右侧对称的天鹅。14. 蓝蓝制作了一个主题为“上海野生动物园”的Flash动画,其中main场景的制作界面如图1所示。图1
请回答下列问题:
(1)、执行“测试影片”命令时,发现“老虎”是由小变大出现的,结合图1,说明对“老虎”图层设置了补间动画。(2)、测试影片结果如图2,“上海野生动物园”字样的图形是由透明至完全显示变化,说明对该图形“颜色”属性的值设置了0—100的变化。图2
(3)、由图2可知,“main”场景的大小为;根据图中所示帧频,又知该场景总共有225帧,则执行完该场景共需秒。(4)、动画制作完成后,执行“测试影片”命令,发现动画放完后即停止。说明在“main”场景“背景”图层的最后一帧上设置了动作命令。三、选择题
-
15. 图所示,有一幅8×8像 素的黑白图像,如果该图像的每一行按照从左到右编码,且第一行编码为10010010,那么第三行的编码的16进制表示为( )A、51H B、D5 H C、AE H D、52 H16. 表达式 len(“Good Morning”)+2 mod 3 +int(3.9999)的值为( )A、15 B、16 C、17 D、表达式运算出错17. 小金编写了一个统计随机数分布的VB程序,部分程序如下所示,在调试程序的时候出现如图所示的错误信息:
n = 0 : m = 0
For i = 1 To 100
If Rnd > 0.5 Then
n = n + 1
Else
m = m + 1
Next i
……
小金仔细分析该程序段后,发现其中缺少了( )
A、For B、End If C、Next D、If18. 有6位学生的身高分别为165,170,172,175,176,180。其中,小民的身高为175,若老师采用对分查找法想要找到小民,则需要找多少次才能够找到( )A、2 B、3 C、4 D、5四、综合题
-
19. 下列VB程序运行时,在文本框Text1中输入“h”后,单击命令按钮Command1后,标签框Label1中显示的内容是。
Private Sub Command1_Click()
Dim a As String
a = Text1.Text
a = Chr(Asc(a) - 32)
Label1.Caption = a
End Sub
20. 只能被1和它本身整除的自然数。要求编写VB程序找出任意两个整数之间中所有的素数及个数,程序运行界面如下图所示。请根据算法将下列程序补充完整。
Function prime(a As Integer) As Boolean
Dim j As Integer
prime = True
j = 2
Do While prime And j <= a \ 2
If a Mod j = 0 Then
prime = False
Exit Do
End If
Loop
End Function
Private Sub Command1_Click( )
Dim i As Integer, a As Integer, b As Integer
Dim count As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
For i = a To b
If = True Then
List1.AddItem Str(i)
count = count + 1
End If
Next i
Label1.Caption = "素数共有" + Str(count) + "个!"
End Sub
21. 某商场元月举行VIP客户积分换购活动,VIP客户根据卡内积分多少可换取不同额度的代金券。假设VIP客户共有n名,VIP卡内积分存放在数据库“customer.accdb”的Integral表中,换购活动的VB程序代码如下,程序运行时界面如第7题图所示。工作人员在文本框Text1中输入VIP卡号后,单击“换购”按钮Command1,在文本框Text2中输出VIP客户的积分数,在标签Label3中显示可以换购的代金券额度,积分清零。按此要求编写程序如下, 但加框处代码有错,请改正。Dim ID( ) As String '用于存放客户卡号
Dim total( ) As Long '用于存放积分数
Dim sc As Long 'VIP客户人数
Dim jf As Long '积分数
Private Sub Command1_Click( )
Dim k As String '客户卡号
Dim q As Long '代金券额度
Dim i As Long
k = Text1.Text
For i = 1 To sc ’顺序查找
If ID(i) = k Then
jf = total(i)
cash(jf) = q ’ ①
Exit For
End If
Text2.Text = Str(jf)
Label3.Caption = “您可换购的代金券总额为:”+ Str(q) + “元”
Next i
End If
End Sub
' cash函数用于计算VIP客户可换购的代金券额度
Function cash(jf As Long) As Long
If jf >= 2000 And jf <= 20000 Then
Cash = jf\2000*10
ElseIf jf > 20000 And jf <= 50000 Then
Cash = jf\2000*11
ElseIf jf > 50000 And jf <= 100000 Then
Cash = jf\2000*12
ElseIf jf > 100000 And jf <= 150000 Then
Cash = jf\2000*13
Else jf > 150000 Then ’ ②
Cash = jf\2000*14
End If
End Function
Private Sub Form_Load()
Dim conn As New ADODB.Connection, rs As New ADODB.Recordset
Dim intSQL As Long
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + App.Path + "\ customer.accdb"
conn.Open
intSQL = "SELECT score FROM Integral"
Set rs.ActiveConnection = conn
rs.CursorType = adOpenStatic
rs.Open intSQL
sc = 0
Do While Not rs.EOF
sc = sc + 1
total(sc) = rs.Fields("score")
rs.MoveNext
Loop
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
End Sub
(1)、加框处①有错,应改为__。(2)、加框处②有错,应改为。