浙江省杭州市2016年信息技术高考模拟卷二

支付宝支付已经成为现在流行的一种支付形式。支付时，支付宝付款吗每分钟自动更新变换编码，这样做的目的是为了（   ）

现在很多卫视为提高收视率，增加与观众朋友的互动，纷纷推出手机微信“摇一摇”，其原理是根据声音来匹配与识别，服务器实时将电视直播流的声音转换成音频指纹，在用户摇一摇的时候将手机端麦克风收到的声音与直播流的音频指纹进行匹配。请问：这摇一摇的过程属于（   ）

小明打开某网站，发现上面有很多他喜欢的明星照片，他很想把它们统统下载下来。请问：用如下图所示方式保存，哪种网页保存形式可以快速地保存这些照片（   ）

 

 

滴滴打车已经成为越来越多年轻人出行的首选。根据规则，统一城市不同车型（快车、出租车、专车）每公里里程的计价价格是不一样的。如果你是设计师，应该选择的程序结构是什么（   ）

用UltraEdit软件观察“jy@cab.com”这几个字符的内码,如图所示。则“@you”这几个字符的内码是（   ）

现在越来越多的企业开始实行指纹刷卡，试问：指纹考勤的方法是员工在考勤机上按下手指，系统便能自动识别员工身份，并记录员工到岗时间或离岗时间。整个过程，考勤机使用了（   ）

①据库技术 ②人脸识别技术  ③字符识别技术   ④指纹识别技术

下图是QQ音乐下载页面截图，试问以下说法正确的是：（   ）

小滨使用Photoshop软件对下图进行加工处理,希望将下图背景的纯白色去除，她可以借助以下哪种工具快速得到：（   ）

用flash合成作品时，有如下动作脚本：

on (release) {

   gotoAndPlay("main", 1);

   stopAllSounds();

}

设置该动作脚本的对象一般是（   ）

【加试题】录制一段时长10秒未经压缩的WAVE格式音频数据，存储参数如下图所示： 则该音频文件存储容量约为：（   ）

【加试题】小金编写了一个统计随机数分布的VB程序，部分程序如下所示，在调试程序的时候出现如右图所示的错误信息：

n = 0

m = 0

For i = 1 To 100

If Rnd > 0．5 Then

     n = n + 1

  Else

     m = m + 1

Next i

……

小金仔细分析该程序段后，发现其中缺少了(   )

【加试题】有如下VB程序：

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer

a = Val(text1.Text)

b = Val(text2.Text)

c = (a + b + Abs(a - b)) \ 3

Text3.Text = Str(c)

End Sub

运行该程序，分别在文本框Text1、Text2中输入5、9，单击命令按钮Command1后，文本框Text3中显示的内容是（   ）

某公司收集了各大团购网站某月交易情况的相关数据，并用Excel软件进行数据处理，如下图所示，请回答下列问题：

编写一个具有下列功能的VB程序：单击“分类”按钮Command1，随机产生10个[10，99]区间中的整数，并将其中3的倍数显示在List1中，余下的数显示在List2中。运行界面如图所示。

 

 

新年来临了，小青利用课余时间，制作了一张新年贺卡，打算发送给她的老师们。她首先用Photoshop软件制作了贺卡的背景，然后又用Flash软件制作了动画。请回答下列问题：

1图

2图

编写VB程序，在如图1所示1×1的正方形区域内产生一定数量、位置随机的点坐标，统计位于0.5×0.5的黑色区域内（包括边界）点的数量。程序运行时界面如图2所示。

 

    

 自上而下两个文本框的名称分别是Text1和Text2，“开始”按钮的名称是Command1。在Text1

中输入数据，单击“开始”按钮，在Text2中显示统计结果。“开始”按钮单击事件处理过程的流程图如右图所示。请根据流程图将下列程序补充完整

     Private Sub Command1_Click( )

       Dim n As Integer, m As Integer, i As Integer

       Dim x As Single, y As Single

       n =

       m=0

       Randomize ′初始化Rnd函数

       For i = 1 To n

       x = Rnd ′随机产生x坐标，0≤x＜1

    y = Rnd ′随机产生y坐标，0≤y＜1

   

    Next i

    Text2.Text = Str(m)

     End Sub

【加试题】求孪生素数。孪生素数是指两个相邻奇数且都是素数，由于它们是最近的素数，就像孪生兄弟一样。下列Visual Basic程序用于查找100以内的所有孪生素数，其中函数f用于判断一个数是否是素数，程序运行界面如图1所示，Command1鼠标单击事件过程的流程图如图2所示。

 图1
   图2

 程序代码如下：

Private Sub Command1_Click()

  Dim i As Integer

  List1.Clear            '清除列表框内容

For i = 3 To 97 ___①___     If f(i) And    ②    Then       List1.AddItem Str(i) + " 和 " + Str(i + 2)     End If   Next i

End Sub

Private Function f(x As Integer) As Boolean  '自定义函数f,返回值为逻辑型

  Dim j As Integer

  f = True

  For j = 2 To Int(Sqr(x))

    If x Mod j = 0 Then

      f =    ③     '函数返回值

      Exit For           '跳出For循环

    End If

  Next j

End Function