相关试卷

  • 1、【加试题】数组元素a(1)到a(10)中存储有10个整数,依次为2,5,7,7,9,11,12,13,13,17,使用两种算法查找特定的整数,部分程序如下:

    '顺序查找代码,查找次数用变量p表示

    For i = 1 To 10

     If a(i) = Key Then

    p = i

     End If

    Next i

    '二分查找代码,查找次数用变量q表示

    i=1 :j=10 :find=Fasle

    Do While i<=j And find=fasle

    x =(i+j)\2

    q = q+1

    If a(x)=Key Then find=True

    If a(x)>Key Then j=x-1

    If a(x)<Key Then i=x+1

    Loop

    若变量key的值为13,程序运行后,则变量p和q的值分别是(  )

    A、8和2 B、9和2 C、8和3 D、9和3
  • 2、【加试题】将11个数据43、26、34、76、45、16、56、90、13、45、81依次存放在数组a(1)到a(11)中,部分VB程序段如下:

    min=a(1)

    n=Val(Text1.Text)

    For i=n to 2 step -1

     If a(i)<min Then

    min=a(i)

    Next i  

    Text2.Text=Str(min)

    假设在文本框Text1中输入“8”,则文本框Text2输出的值是(  )

    A、90 B、26 C、16 D、13
  • 3、【加试题】将一段分辨率为800*600,24位色彩,NTSC制式的视频影像放到一张700MB的光盘,可以存放多少时间?(  )
    A、10秒 B、17秒 C、25秒 D、34秒
  • 4、某Flash作品的部分时间轴界面如图所示。

    下列描述与图中信息不相符的是(  )

    A、文字图层的内容一直显示在舞台上 B、按钮图层的补间动画时长大约3.7s C、可以在背景图层的最后一帧插入关键帧 D、在动物图层最后一帧执行清除关键帧后,该场景就不存在动作脚本命令
  • 5、某Photoshop作品的图层内容如图所示,下列说法正确的(  )

    A、所有图层都可以立即删除 B、“人物”图层共设置了两个图层样式 C、“草地”图层内容是不可见的 D、“文本”图层的图层样式都可见
  • 6、使用GoldWave软件处理“sound.wav”操作过程如下,新文件的大小是原文件大小的(  )

    ①使用剪裁工具将声音文件的时间变为原来的一半

    ②使用“效果”-“音量”-“更改音量”将音量调整为50%

    ③将文件保存为sound2.wav

    A、1/1 B、1/2 C、1/4 D、2
  • 7、某算法的流程图如图所示:

    执行该算法,依次输入a的值为3,5,2后,算法的输出结果为(     )

    A、3 B、5 C、15 D、30
  • 8、使用Access软件创建一张数据表,其结构如图所示:

    在该数据表中录入数据时,下列操作能实现的是(  )

    A、在“商品名称”字段中输入“洗衣机” B、在“商品编号”字段中输入“2017122501”  C、在“库存”字段中输入“100台” D、在“生产日期”字段中输入“2017\12\25”
  • 9、使用 UltraEdit 软件观察字符“壬戌(rén xū)”的内码,部分界面如图所示。

    下列说法正确的是(  )

    A、字符“壬戌(rén xū)”中有7个ASCII码字符 B、字符“é”的二进制码是“101010000” C、字符“ū”的十六进制码是“A8 B1” D、字符“字符“rén xū”总共需要6个字节的存储空间
  • 10、下列应用中,没有使用智能处理技术的是(  )
    A、利用指纹快速解锁手机 B、停车场使用监控拍照识别车牌自动计费 C、使用在线翻译实现中英文转换 D、将书籍扫描成图像保存到计算机中
  • 11、小明用IE浏览一个图文并茂的网页,地址栏信息为“http://www.zjedu.gov.cn/index.html”。下列描述正确的是(  )
    A、网页中图像的全部信息保存在index.html文件中 B、该网页的URL为“www.zjedu.gov.cn/default.html” C、网页内容是用HTML(超文本标记语言)描述的 D、网页中的超链接对象只能是文字,不能是图片
  • 12、下列说法正确的是(  )
    A、入住宾馆时登记身份信息,主要是为了保证信息的安全性 B、邮件在两个服务器之间传送一般采用TCP/IP协议 C、按商品类别在某购物网站进行查询属于主题目录检索 D、将普通的BMP格式的图片文件转为JPG格式属于无损压缩
  • 13、写一个字符串压缩程序:对于2~9个相同字符组成的字符串,用两个字符来编码:第一个字符表示这个字符串的长度值(即2-9);第二个字符表示相同字符的值。如字符串“AAAAA”可以压缩为“5A”,“AA”可以压缩为“2A”。如果存在某个字符串,其中没有一个字符连续重复出现,就表示成:以数字1开始,后面跟着这一字符串,再以数字1结尾。如字符串“BCE”可以表示成“1BCE1”,“A”可以表示成“1A1”。又如“XXXXXXXXABCYYYZ”的压缩结果是“8X1ABC13Y1Z1”。假设被压缩字符串中只会出现字母,连续相同字母不会超过9个。程序在Text1中输入被压缩的字符串,Text2中输出了压缩的结果,请在划线处填入合适的代码。
    (1)、若Text1中输入的字符串为“XXXXXAXAAA”,那么压缩的结果是
    (2)、以下程序段运行时,为了实现上述功能,请在划线处填入合适的代码。

    Private Sub Command1_Click()

        Dim s As String

        Dim n As Integer , i As Integer

        s = Text1.Text

        n=Len(s) : i=1 : result=""

        Do While i<=n

            s1=Mid(s, i, 1)

            numbers=0

    ‘扫描到的字符都和s1相同

            Do While 

                i=i+1

                numbers = numbers+ 1

            Loop

            If numbers>0 Then

                result= result & &s1

                    i = i+1

            End If

            start =1

            s1 = Mid(s,i,1)

            numbers =0

    '扫描到的字符都和s1不同

            Do While s1<>Mid(s,i+1,1)

                i=i+1

                numbers = numbers+ 1

                s1=Mid(s,i,1)

            Loop

            If Mid ( s , i + 1 , 1 ) = s1 Then

                numbers = numbers-1

            End If

            If numbers >= 0 Then

                result = result&"1" &&"1"

            End If

        Loop

        Text2.Text=result

    End Sub

  • 14、平面上有n(3<=n<=100)个房间围成一圈,编号分别为 1~n,相邻的两个房间之间均有一扇门,第i个房间最多居住人数为a(i)。初始时选择一个房间,将所有人都聚集在该房间,接着每个人都可以顺时针方向走到相邻的房间,直到找到居住的房间。最后每个房间刚好住满。一个人每经过一扇门花费1的能量,请确定初始房间及每个人找房间的方案,使得所有人花费的能量的和最小。

    例如:n = 5,a(1)= 4,a(2)= 7 ,a(3)= 8,a(4)= 6,a(5)= 4。

    最佳方案为初始时所有人聚集在2号房间花费的最小能量为7*0+8*1+6*2+4*3+4*4=48。

    实现上述功能的 VB 代码如下,但加框处代码有错,请改正。

    Dim a( 1 To 100) As Integer   '依次存储编号为 1 到 100 的房间的最多居住人数

    Private Sub Form_Load()

    '产生N的值

    '本过程从数据库中依次读取编号为1到 N的房间的最多居住人数,并存储在数组a中

    '代码略

    End Sub

    Private Sub Command1_Click()

    Dim i As Integer, j As Integer, w As Integer

    Dim t As Long, ans As Long

    ans = 32767

    For i=1 To n

         t = 0

         For j=0 To n-1

                ‘(1)

          If w=0 Then w=n

               ‘(2)

       Next j

       If t < ans Then ans = t

    Next i

    Text2.Text = Str(ans)

    End Sub

    以上程序段运行时,为了实现上述功能,加框处代码应改正为:

    ;⑵

  • 15、小李创作“春色满园”故事的多媒体作品。他首先使用Photoshop软件制作一张背景图片,然后使用Flash软件制作动画。请回答下列问题:

    图1

    (1)、在此状态下,想要选中背景图层中的灰色天空区域,可以实现的工具有(选填:A .矩形选框/B .魔棒/C .磁性套索/D .裁剪E.移动)
    (2)、如图2所示,该场景开始播放后,燕子飞翔的动画大约持续秒。

    图2

    (3)、如图2所示,舞台上的诗句字样的实例来源于库中“诗句”图形元件。编辑库中的“诗句”图形元件,将所有文字字体、字号、颜色依次设置为仿宋_GB2312、20、#333937,则舞台上的诗句字样的字体、字号、颜色(选填:会/不会)进行相应改变。
    (4)、该场景播放结束时停止播放,出现含有“朗读”字样的按钮:单击该按钮,在浏览器窗口中打开当前文件夹中的“shiju.txt”文件,则该按钮上的动作命令是
    (5)、作品完成后,小李想看动画效果,他选择“控制”菜单中的“播放”命令,含有“阅读”字样的按钮(选填:能/不能)实现动作要求。
  • 16、编写“鞋码换算”程序,实现如下功能:在文本框 Text1 中输入脚长 n(单位:厘米),单击 “换算”按钮 Command1,在标签 Label1 中显示相应鞋码,同时在列表框 List1 中显示与脚长对应的标准鞋码表。程序运行界面如图所示。

    (1)、如图所示,能生成运行界面中列表框的控件是(

    (2)、实现上述功能的VB程序如下,请在划线处填写合适的代码。

    Private Sub Command1_Click()

    Dim n As Single, i As Integer, c As Integer

    List1.Clear

    n = Val(Text1.Text)

    If n - Int(n) > 0.5 Then

    n = Int(n)+1      ‘n 小数部分大于 0.5 的加 1,0.5 及以下的加 0.5

      Else

          

    End If

    c = n * 2 - 10

    Label1.Caption = "适合你的鞋码为:" + Str(c)

    For i = 22.5  To n+2   step 0.5

    If Int(i) = i Then

    List1.AddItem Str(i) + "   " + Str(c)

    Else

    List1.AddItem Str(i) + "   " + Str(c)

    End If

    Next i

    End Sub

    (3)、若小容的脚长为23.3,则适合她的标准鞋码为
  • 17、金老师整理了某班级两次考试的成绩,并用Excel软件进行数据处理。如图1所示。请回答下列问题:

    图1

    (1)、单元格F19,J19是通过复制单元格D19中的公式得到的。则在单元格J19粘贴后,J19的公式是
    (2)、若将单元格J7的值改为21,单元格J19的值(选填:会、不会)变化。
    (3)、若要对“高三02班”的学生以“0825专项测试”的“信息”得分降序排序,则排序时选择的数据区域是

    图2

    (4)、选中单元格区域F3:K6后,在“数据”选项卡中,执行“筛选”命令,在单元格G3和K3中的显示的“筛选”按钮上的筛选方式均如图2所示。则筛选出的记录有条。
  • 18、【加试题】 有如下VB程序段:

    Dim a(1 To 10) As Integer

    a(1) = 1: a(2) = 2

    For i = 3 To 10

        a(i) = a(i - 1) + a(i - 2)

    Next i

    i = 1: j = 10: f = False

    Do While i <= j And f = False

        num = num + 1

        m = (i + j) \ 2

        If num = a(m) Then

            f = True

        ElseIf num < a(m) Then

            j = m - 1

        Else

            i = m + 1

        End If

        Text1.Text = Text1.Text + Str(m)

    Loop

    该程序段执行结束后,文本框Text1中显示的内容是(  )

    A、8  2 B、5 2 C、8 2 3 D、5 2 3
  • 19、【加试题】有一个数组,采用冒泡排序,第一遍排序后的结果为:4,10,5,32,6,7,9,17,24那么该数组的原始顺序不可能的是(  )
    A、10,5,32,6,7,9,17,24,4 B、10,5,32,6,7,9,4,17,24 C、10,4,32,5,6,9,7,17,24 D、4,10,5,32,17,9,24,6,7
  • 20、【加试题】一段分辨率为320*280的视频,采用NTSC制式,16位彩色,未经压缩时的大小为56M,则该视频时长为(  )
    A、8s B、10s C、15s D、20s 
上一页 1516 1517 1518 1519 1520 下一页 跳转