浙江省温州市十校联合体2015-2016学年高二下学期期中联考信息技术试题

试卷更新日期:2018-03-08 类型:期中考试

一、单项选择题

  • 1. 小明要把信息作业上传到教师机上。教师机的服务器地址为"FTP://10.133.22.110/ ",地址中的"FTP"表示(   )
    A、超文本传输协议 B、文件传输协议 C、TCP协议 D、SMTP协议
  • 2. 小丽用OCR软件识别文件,发现OCR识别的准确率很低,准备向老师求助,应该把下列哪组文件发送给老师(   )。
    A、th.jpg和th.fla B、th.bmp和th.rtf           C、th.png和th.tif D、th.txt和th.png
  • 3. 某Access数据表打开后如图所示,下列描述中正确的是(   )

    A、“商品代码”字段的类型是数值型 B、该数据表记录数少于10条 C、该数据表字段数是6个 D、删除“销售日期”字段后,记录数不会少
  • 4. 语句  “ i=3:s=1/(i-3)”  无法执行,原因是它违反了算法特征中的(   )
    A、有穷性 B、唯一性 C、可行性 D、确定性
  • 5. 用UltraEdit观察字符内码,结果如图所示:

     

    则字符“It”的十六进制内码值为:(   )

    A、43 54 B、43 74 C、49 54 D、49 74
  • 6. 使用GoldWave软件处理名为sound1.wav的双声道音频,删除了右声道中的声音,并将音量降低到原来的一半,然后按原格式以sound2.wav为文件名保存。Sound1.wav 与sound2.wav相比,存储容量(   )
    A、不变 B、减小1/2 C、减小1/3 D、减小1/4
  • 7. 用Photoshop处理图像,下列说法正确的是(   )
    A、吸管工具可以从图像中取色,并指定为新的前景色 B、将PSD格式文件存储为BMP格式后,不会丢失任何信息 C、对某图层使用滤镜效果,会使其图层的数目增加 D、Photoshop中“背景层”始终在最底层
  • 8. 下图是制作某flash作品时的截图,从图中可知,“背景”图层中的背景图片仅在第1帧到第20帧出现,若要使背景图片一直延续到第45帧,可在该图层的第21帧上进行的操作是(   )

    A、清除关键帧 B、删除帧 C、清除帧 D、插入帧     
  • 9. 用迅雷软件下载一部25帧/秒、10秒、分辨率为1024×768、16色彩色、未经压缩的视频片段,当时网络的下载速度是 380 KB/s,下载完这个片段大约需要多少时间( )
    A、10分钟 B、2分钟 C、4.2分钟 D、16.8分钟
  • 10. VB表达式9\8/2 + 12 Mod 3*3 的值是(   )。
    A、0.5 B、7 C、3.5 D、5
  • 11. 数学老师写了一组数列1,4,7,10,13,……求前N项的和,小明想用递归算法来完成,那么他设计的递推公式正确的是(   )。
    A、f(1)=1: f(n)=n*2-1 B、f(1)=1: (n)=n*2+1 C、f(1)=1: f(n)=n+3 D、f(1)=1: f(n)=f(n-1)+3

二、综合题

  • 12. 以下(图1)为2016年高一(1)班的成绩表,请根据表格提供的信息回答下面几道小题。

    图1

    (1)、观察数据表,发现A列数据格式应该设为
    (2)、某一同学想用RNK函数和自动填充的方法实现对总分的排名,则I2单元格公式为 。(rank函数是求某一个数值在某一区域内的排名,如=RANK(A1,A1:A5),表示A1在区域A1:A5中的名次)。
    (3)、下图(图2)图表的数据源区域为,系列产生在  。

    图2

    (4)、想只显示平均分低于80分的学生的名单,可使用 来实现。操作后发现图表 (填“会”或“不会“) 发生变化。
  • 13. 求孪生素数。孪生素数是指两个相邻奇数且都是素数,由于它们是最近的素数,就像孪生兄弟一样。下列Visual Basic程序用于查找100以内的所有孪生素数,其中函数f用于判断一个数是否是素数,程序运行界面如图(图1)所示,Command1鼠标单击事件过程的流程图如图(图2)所示。

    程序代码如下:

    Private Sub Command1_Click()

      Dim i As Integer

      List1.Clear  '清除列表框内容

      For i = 3 To 97 ______

        If f(i) And f(i+2)=true Then

          List1.AddItem Str(i) + " 和 " + Str(i + 2)

        End If

      Next i

    End Sub

    Private Function f(x As Integer) As Boolean  '判断是否为素数,若是返回true,若不是则返回false

    ………

    End Function

    (1)、程序中加框部分的算法是(选填:解析算法/枚举算法)
    (2)、应用程序界面设计时,为添加”100以内的孪生素数”,应使用图3所示的“控件工具箱”中的(填写相应编号),并将其属性设置为”100以内的孪生素数
    (3)、在程序①划线处,填入适当的语句或表达式,把程序补充完整:

    程序中①划线处应填入

  • 14. 小周同学制作了Flash动画,某个场景制作界面如图所示,请回答下列问题。
    (1)、根据图中所示,当前场景的名称为 。该场景总共有60帧,则执行播放完该场景共需秒。玫瑰花图层的动画属于 动画。

    (2)、执行“影片测试”,发现动画循环播放,小周想播放一遍后停止,他必须在 图层添加脚本动作为  。
  • 15. 下列VB程序的功能是:程序运行时,单击命令按钮Commandl后,产生10个[1,999]范围内互不相同的随机整数,依次显示在列表框List1中,然后将它们按从小到大的顺序排序,排序结果显示在列表框List2中。

    数组a用于存储产生的10个随机整数,函数f(x)用于判断随机整数x与已生成的整数是否有重复,若有重复则返回True,否则返回False。

    (1)、虚线框内程序段所采用的排序算法名称是。(填:冒泡排序/选择排序)
    (2)、在程序①和②划线处,填入适当的语句或表达式,把程序补充完整。

    Dim a(1 To 10) As Integer

    Function f(x As Integer) As Boolean   

           ′代码略

    End Function

    Private Sub Commandl_Click()

    Dim n As Integer                         ′n用于统计已经产生的随机整数个数

    Dim i As Integer.j As Integer

    Dim x As Integer.k As Integer

    Randomize                                   ′初始化Rnd函数

    n=0

    List1.Clear                                 ′清除列表框中内容

    List2.Clear

    Do While n<10

        x=①                     ′产生[1,999]范围内的随机整数

        If Not f(x) Then

           n=n+1

               a(n)=x

    List1.AddItem Str(a(n))

        End If

    Loop

    For i=1 To 9                                

    For j=10 To i+1 step -1

            If ② Then

                k=a(j):a(j)=a(j-1):a(j-1)=k

            End If

        Next j   

    Next i 

    For i=1 To 10

        List2.AddItem Str(a(i))

    Next i

    End Sub

  • 16. 由人民政府授权发放给市民用于办理个人相关事务和享受公共服务的集成电路卡(IC卡),具有信息储存、身份识别、电子支付等功能。每位市民都可以拥有一张唯一卡号的市民卡,卡内会记录每位市民的姓名、电话、金额等信息。

        假设共有500个市民,市民的相关信息都存储在“information.accdb”的data表中,”xm, ye,kh” 字段放市民的姓名,余额,卡号。查询程序界面如第16题图所示。工作人员在文本框Text1中输入卡号,单击“查询”按钮,如果找到,就在Label1中显示卡内市民姓名和卡内余额;否则显示“查无此人”。程序如下,请按要求将程序补充完整。

    Private Sub command1_click()

    Dim conn As New ADODB.Connection, rs As New ADODB.Recordset

    Dim strSQL As String

    Dim a,b,c as string

    Dim n as integer

    conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + App.Path + "\        ①              "

     conn.Open

    strSQL ="select * from data"

     Set rs.ActiveConnection = conn    

      rs.Open strSQL 

      Label1.Caption = ""

    c=val(text1.text)

    n=0

    rs.movefirst

    Do while not rs.EOF

    n=n+1

    a=rs.Fields("xm")

               ②       

    If c= rs.Fields("kh") then

    Label1.caption=a+ "的卡内余额为"+b+"元"

    Exit if

    else

    rs.movenext

    end if

    loop

    if n=500 then Label1.caption=”查无此人”

    rs.close

      conn.close

    set rs=nothing

    set conn=nothing

     End Sub

    (1)、程序中①划线处应填入
    (2)、程序中②划线处应填入