相关试卷

  • 1、果园里有n堆果子放在地上,现要将所有果子合并成一堆。每次只能合并两堆果子,消耗的体力等于两堆果子的重量之和。显然,n堆果子需要经过n-1次合并。合并果子的过程中总共消耗的体力等于每次合并所耗体力之和。为了尽可能地节省体力,我们每次都选择重量最小两堆进行合并。例如,有三堆果子,重量依次为1,2,9。可以先将1、2堆合并,新堆重量为3,耗费体力为3。接着,将新堆与原先的第三堆合并,又得到新的堆,重量为12,耗费体力为12。所以总共耗费体力为3+12=15。可以证明15为最小的体力耗费值。

    编写VB程序,实现上述合并功能。运行程序时,将n堆果子的重量从数据库读入到a数组。单击“合并”按钮Command1后,在文本框Text1中输出最小的体力耗费值。请回答下列问题:

    (1)、若要清空文本框Text1中的内容,能实现该功能的语句是(单选,填字母:A .Text1.Caption=“”/B .Text1.Clear/C .Text1.Text=“”)。
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Private Sub Form_ Load( )

    ‘将n堆果子的重量从数据库导入到数组a,代码略。

    End Sub

    Private Sub Command1_Click( )

        Dim f As Boolean

        Dim last As Integer

        Dim a(1 To n) As Integer

        i= 1

        Do While i<n And Not f

            f=True

            For j=n To i+1 Step-1

                If a(j)<a(j- 1) Then

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

                    last= j

                    f= False

                End If

            Next j

           

        Loop

        For i= 1 To n-2

            tmp=a(i)+a(i+1)

            j=

            Do While a(j)< tmp

                a(j-1)= a(j)

                j=j+1

                If j=n+ 1 Then Exit Do

            Loop

           

            Min=Min+tmp

        Next i

       

        Text1.Text = Min

    End Sub

    (3)、程序中加框处代码有错,请改正。
  • 2、小组创作了主题为“保护环境”的Flash作品,部分界面如图a所示,请回答下列问题:

    图a

    (1)、在制作并合成该作品前,小组应先完成下列哪些工作?(多选,填字母:A .确定获取原始素材的方式/B .策划制作脚本/C .发布作品/D .刻录光盘,递交作品/E .需求分析)。
    (2)、“声音”图层的声音设置如图b所示,若将“重复”修改为2次,则测试影片时该声音文件将播放秒。

    图b

    (3)、下列不属于元件类型是(单选,填字母:A .影片剪辑/B .位图/C .图形)
    (4)、如图a所示,则以下说法不正确的是        (多选题)
    A、Flash是以帧为基础的多媒体创作工具 B、若将“汽车”图层的补间动画的缓动值设置为-100,则动画时长不变 C、“保护环境”图层实现了“汽车尾气”图形逐渐变成“保护环境”字形,该动画属于形状补间 D、若将“背景”图层第60帧移动到第20帧,则“背景”图层中的内容约2秒后消失 E、该动画“按钮”一直显示于舞台,若要“按钮”仅最后一帧出现,则将“按钮”图层第1帧执行“清除帧”可以实现。
    (5)、测试影片时,点击“相关文件”按钮,实现在浏览器中显示位于同一文件夹下“环境.html”文件的内容并关闭动画,则按钮上添加的命令为
  • 3、小张收集了某校图书馆借阅排行TOP300的相关数据,并用Excel软件进行处理,如图a所示:

    图a

    (1)、为计算图a中的“流通次数”和“预约次数”,小张已利用公式正确计算了“流通次数”,他希望通过修改K3单元格的公式,利用自动填充得到“预约次数”L3:L7区域中正确的数据,则单元格K3中的公式应修改为。(提示:SUMIF函数用于求满足条件的单元格之和,例如=SUMIF(E3:E302,J3,G3:G302)用于求单元格区域E3:E302中与单元格J3中值相等的对应单元格区域G3:G302中的值之和。)
    (2)、根据图a中数据制作了图表如图b所示,则创建图表的数据区域

    图b

    (3)、根据图a所示,下列说法正确是           (多选题)
    A、若表格已排序,则主要关键字是“流通人次”,次要关键字是“预约人次” B、若以“类型”为文学,以“流通人次”最大的5项进行筛选,得到的记录数可能大于等于5条 C、因误操作将“价格”所在列删除,则“流通次数”和“预约次数”的数据将不能正确计算 D、若要找出文学类流通人次大于10次的书籍,则可以利用“类型”为文学,“流通人次”大于10进行筛选
  • 4、下列对分查找代码用于查找非升序序列中不小于key的下标最大值,部分代码如下:

    L=1: R=n+ 1

    Do While L< R

        m=(L+R)\2

        If key > a(m) Then

              ① 

        Else

            L=m+ 1

        End If

    Loop

    If R= 1 Then

        Text2.Text = "数组中所有元素均小于" & Str(key)

    Else

        Text2.Text= "不小于" & Str(key) & "的下标最大值是: " & Str(  ②  )

    End If

    则划线处代码正确的是(    )

    A、①R=m-1   ②L B、①R=m-1   ②L-1 C、①R=m   ②L D、①R=m   ②L-1
  • 5、某排序算法的VB程序段如下:

    n=6: c=0: d=0: st=1: ed=n

    Do While st < ed

        c=c+1

        For j=st To ed- 1

            d=d+1

            If a(j)> a(j+ 1) Then

                tmp = a(j): a(i)=a(j+1): a(j+1)= tmp

                ed=j

            End If

        Next j

        For j=ed To st+1 Step-1

            d=d+ 1

            If a(j)< a(j- 1) Then

                tmp= a(j): a(i)=a(j- 1): a(j- 1)= tmp

                st=j

            End If

        Next j

    Loop

    数组元素a(1)到a(6)的值依次为“5,6,12,15,10,8”,程序结束时,c和d的值分别为(    )

    A、2,9 B、2,10 C、4,9 D、4,10
  • 6、由大写字母组成的长度相同的两个字符串s1和s2,若所含各字母数量相等则可以归为一类。如“ABDAC”与“AABCD”归为一类,与“AABBC”不可以归为一类。实现该功能的VB程序段如下:

    Dim s1 As String, s2 As String, a As Integer, i As Integer, b(1 To 26) As Integer    'b数组初值均为0

    s1 = Text1.Text: s2 = Text2.Text

    For i= 1 To Len(s1)

        a= Asc(Mid(s1, i, 1))-65+ 1

          ⑴  

    Next i

    For i= 1 To Len(s2)

        a= Asc(Mid(s2, i, 1))-65+ 1

          ⑵  

    Next i

    For i= 1 To 26

        If   ⑶   Then Exit For

    Next i

    If   ⑷   Then Label1.Caption = "能归为一类" Else Labl1.Caption= "不能归为一类"

    填空处的代码可以由以下部分组成:

    ①b(a)=b(a)+1  ②b(a)=b(a)-1  ③b(i)<>0  ④b(i)=0  ⑤i<=26  ⑥i>26

    代码顺序正确的是(    )

    A、①②③⑤ B、①②④⑥ C、②①③⑥ D、②①④⑤
  • 7、下列四段VB程序执行后运行结果与其余三个选项不相同的是(    )
    A、 B、 C、 D、
  • 8、某算法的流程图如图所示,执行完该流程图后输出结果可能的是(    )

    A、0 0 0 0 0 0 B、2 4 2 5 2 8 C、6 10 8 12 6 8 D、10 22 14 16 18 12
  • 9、下列VB表达式的值与其余三个选项不同的是(    )
    A、Val(Mid("2021",3,2)) B、2021mod1000\10 C、Abs(Int(-21.1)) D、Val("2"+"1")
  • 10、按以下参数存储BMP格式文件,占用存储空间最小的是(    )
    A、1600*1200黑白位图 B、800*60016位色 C、400*300RGB/8 D、800*600256色
  • 11、用Photoshop软件制作“最美逆行者”作品,部分界面如图所示,下列说法不正确的是(    )

    A、可将“武汉”图层的图层样式拷贝到“病毒2”图层 B、可在“背景”图层中用“画笔”工具直接绘制图像 C、当前状态下,“武汉”图层仅显示“投影”和“外发光”效果 D、可用“自由变换”命令将“病毒2”图层中的病毒缩小到原来的50%
  • 12、使用Access软件打开某数据库,部分界面如图所示,下列说法正确的是(    )

    A、Access是常用的小型数据库应用系统 B、Access无法存储图片 C、添加一条新记录,其“收藏日期”字段可能显示为“2001年4月5日” D、Access中“是否借出”字段在导出到Excel时值会显示TRUE或FALSE
  • 13、下列关于网络与网络协议,说法正确的是(    )
    A、只有纯文字的网页才能够用记事本编辑 B、网页地址用URL标识,收藏夹收藏网页实质上就是保存该网页的URL C、使用SMTP协议可以实现发件人的邮件直接发送到收件人的计算机中 D、采用“网页,仅HTML”方式保存网页,得到的文件是用HTTP语言描述的
  • 14、下列应用中,没有体现人工智能技术的是(    )
    A、某综艺节目中能和人智能对话的虚拟机器主持人 B、某线上购物软件可以采用指纹识别支付 C、通过在线翻译软件将外文网站内容自动翻译成中文 D、用户在家中通过佩戴特殊的设备体验刺激的过山车
  • 15、下列关于信息与信息技术的说法,正确的是(    )
    A、信息必须依附于某种载体,因此其表现形态不可以转换 B、信息具有载体依附性,所以信息不能脱离它所反映的事物进行传播 C、信息的载体可以是文字,也可以是图像、声音等 D、信息技术是计算机对信息进行采集、处理、传输、存储、表达和使用的技术
  • 16、  元旦晚会上,某同学录制了一段WAVE格式音频,时长为3分20秒,采样频率为44.1kHz,量化位数为16位,双声道。请问该音频文件存储容量约为多少MB(结果保留一位小数)?
  • 17、计算题
    (1)、计算10111101B+10010111B,结果以二进制呈现。
    (2)、设a=8、b=3、c=2,计算表达式not(a!=b and a==c)的值,结果用True或False表示。
  • 18、以下程序引入Python的math模块,使用math模块下的floor函数对命令行输入的实数进行取整:

    n=input(“请输入一个实数:”)

    n2= math. floor(float(n))

    print(n2)

    该程序段划线处应填入的代码为

  • 19、有如下程序段:

    s=0

    for i in range(1,11,2):

    s=s+i

    print(s)

    该程序段运行后,s的值为

  • 20、有如下程序段:

    a=6

    b=18

    c=26

    if a>=b and a>=c:

    max=a

    elif b>=a and b>=c:

    max=b

    elif c>=a and c>=b:

    max=c

    print (max)

    该程序段运行后,输出的max的值为

上一页 844 845 846 847 848 下一页 跳转