相关试卷

  • 1、为方便习题讲解,需对某次考试中选择题得分率数据进行统计分析,找出选择题得分率最低的前m项对应的题号及考点(若有与第m项得分率相同的,并选取)。

    编写VB程序,实现上述功能。运行程序时,先读取每个选择题的题号、得分率和考点,显示在列表框List 1中。在文本框Text 1中输入得分率最低的前m项值,单击“统计”按钮,按照得分率从小到大升序排序,并在列表框List 2中输出得分率最低前m项的题号、得分率及考点。程序运行界面如图所示。

    请回答下列问题:

    (1)、“统计”按钮的事件过程名是
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Dim n As Integer

    Dim th(0 To 100)As Integer,df(0 To 100)As Single,kd(1 To 100)As String

    Private Sub Form_Load( )

        ‘读取题号、得分率和考点分别存入数组th、df和kd数组,在列表框List 1中显示,代码略

        ‘选择题的个数存入变量n,代码略

    End Sub

    Function dq(x As String,k As Integer)As String

        ‘固定数据的位数

        dq= X

        Do While

            dq=dq+""

        Loop

    End Function

    Private Sub Select _Click( )

        Dim m As Integer,i As Integer,j As Integer,p As Integer,t As Integer,mm As Integer

        List 2.Clear

        m=Val(Text1.Text)

        i=1

        Do While i<=n-1

            p=i

            For j=i+1 To n

                If Then p= j

            Next j

            If p<i Then

                t=th(i):th(i)= th(p):th(p)= t

            End If

            If  Then Exit Do

            i=i+1

        Loop

        For i=1 To m

            List 2.AddItem dq(Str(th(i)),6)+ dq(Str(df(th(i))),8)+ dq(kd(th(i)),12)

        Next i

    End Sub

    (3)、程序中加框处代码有错,请改正。
  • 2、使用Flash软件创作一个关于“中秋节”的多媒体作品,部分界面如图所示。请回答下列问题:

    (1)、在制作作品前,小明进行了相应的需求分析。下列不属于创作需求分析的是(多选,填字母:A .该作品主要面向中小学生/B .该作品要求使用Flash软件制作/C .该作品的主题思想为“庆祝中秋佳节”/D .该作品的使用价值和使用频率如何/ E .分析作品所需素材的获取方式和处理软件)
    (2)、已知舞台大小为600×400像素,“小船”图层使用了“小船”元件产生的实例制作补间动画,实现从舞台外左侧缓慢移入舞台中的动画效果,则该图层第1帧中小船实例的坐标值可能是(填字母:A .(300,200)/B .(700,300)/C .(300,300),该补间动画的类型是
    (3)、“音乐”图层中的声音同步属性为“数据流”,测试场景时,若要使动画播放到第30帧时,声音重新开始播放,可进行的操作是
    (4)、测试影片时,“播放”按钮在影片播放到最后一帧时出现,单击“播放”按钮,影片跳转到“习俗”场景第1帧继续播放,则“播放”按钮的动作脚本为
  • 3、某地事业单位对参加职位招聘的人员进行面试评分,并使用Excel软件进行数据处理,如图a所示。请回答下列问题:

    图a

    (1)、面试总分是将“语言表达”、“组织协调” 、“举止仪表”、“综合分析”的成绩分别乘以对应的比重后相加所得。可在G3单元格中输入公式 , 并使用自动填充完成G4:G20区域的计算。
    (2)、为了更直观地对比选手面试项目的得分情况,创建了如图b所示的图表,则生成该图表的数据区域为

    图b

    (3)、若在图a所示工作表中对数据进行进一步的操作,下列说法正确的是            (多选,填字母)
    A、若要对职位编号为“XP04”的选手按“面试总分”列数据从大到小排序,应选择的排序区域为A16:G19 B、在工作表的C列和D列之间插入一列,“面试总分”中显示的值不会发生变化 C、选中数据区域B2:G7进行数据筛选,并设置筛选条件为“面试总分”的“最大3项”,图b并不会发生变化 D、要将选手的各项得分在图b中的柱形上显示,可通过添加图表的“数据标签”来实现
  • 4、某对分查找算法的VB程序段如下:

    ‘数组元素f(1)到f(8)赋初值为0,代码略

    Key=2*Int(Rnd*45)+1

    i=1:j=9:c=0:s=0

    Do While i<j

        c=c+1

        m=(i+j)\2

        f(m)=1

        If Key<a(m)Then j=m Else i=m+1

    Loop

    For k=1 To 8

        s=s+f(k)

    Next k

    数组元素a(1)到a(8)中的值为:4,20,32,42,58,60,90,91。执行该程序段后,下列说法正确的是(    )

    A、变量c的值可能为5 B、变量s的值一定为奇数 C、变量i的值可能为9 D、变量j的值可能为7
  • 5、编写程序,实现功能:通过双向排序,使数组元素a(1)到a(n)升序排列。

    Const n =10

    Dim a(1 To n)As Integer

    ‘随机生成10个1-100之间的数存储在数组a中,代码略

    For i=1 to n\2

    For j=    ⑴     To i+1 Step-1

    If a(j)<a(j-1)Then t = a(j):a(j)=a(j-1):a(j-1)=t

    Next j

    For k=i+1 To    ⑵      

    If a(k)>a(k +1)Then t =a(k):a(k)= a(k +1):a(k+1)=t

    Next k

    Next i

    划线处可选代码为:①2   ②n-i+1   ③n   ④n-i

    则(1)、(2)处语句依次为(    )

    A、①③ B、③① C、②④ D、③②
  • 6、有如下VB程序段:

    s="R255:G122:B221:End"

    c=1

    For i=1 To Len(s)

        t=Mid(s,i,1)

        If t>="0" And t<="9" Then

            a(c)=t+a(c)

        Else

            c=c+1

        End If

    Next i

    已知数组a各元素的初始值均为空字符串,执行该程序段后,字符串122存储在数组(    )中。

    A、a(2) B、a(4) C、a(5) D、a(6)
  • 7、有如下VB程序段:

    a=Int(Rnd*20)*2+11

    r=0:s=""

    Do While a>0

        r=a Mod 7

        s=r&s

        a=a\7

    Loop

    执行该程序段后,变量s的值不可能是(    )

    A、"16" B、"23" C、"64" D、"100"
  • 8、某算法的部分流程图如图所示,执行这部分程序,下列说法正确的是(    )

    A、该流程图用于求1到100间,所有能被5整除的数的和 B、该流程图从结构上看,是一个循环结构中又嵌套了另一个循环结构 C、程序运行结束后,i的值是100 D、将①处s←1:i←2改为s←1:i←1,不影响输出结果
  • 9、关于正整数m、n、k的运算,以下VB表达式中的结果与另三个可能不相同的是(    )
    A、m=Int(Sqr(m))^2 B、Int(Rnd* k)/k <1 C、m-(m\2)*2=m Mod 2 D、(n\k=n/k)=(n Mod k =0)
  • 10、未经压缩的BMP图像文件和AVI视频文件相关信息分别如下图所示。

    文件名:bg.BMP

    尺寸:1600*1200

    颜色模式:RGB/8

    文件名:logo.AVI

    尺寸:400*300

    颜色模式:256级灰度

    时长:10秒

    帧频:30fps

    由此可知图像文件的存储容量与视频文件的存储容量比约为(    )

    A、1:50 B、4:25 C、4:75 D、8:15
  • 11、使用Photoshop软件制作“四月你好”的作品,部分编辑界面如图所示。

    下列说法正确的是(    )

    A、“背景”图层中的图像内容不可以进行修改 B、可通过“自由变换”仅改变“传统节气”图层中“节气”文字的大小 C、交换“节气解读”和“鱼”图层的顺序,不影响作品的呈现效果 D、可通过“拷贝图层样式”将“夏至”图层的图层样式复制到莲花图层
  • 12、某数转换为十进制数为n,若n\5=5,则该数可能是(    )
    A、1DH B、21H C、10111B D、1111B
  • 13、用Access软件设计某大学新生管理信息系统的数据库,其中“基本信息表”中需要存储如图所示的数据。

    学号

    姓名

    性别

    出生年份

    户籍所在地

    注册日期

    是否住校

    202002001

    张阳

    2002

    温州市瓯海区

    2020/8/31

    202003001

    李玥

    2001

    宁波市北仑区

    2020/8/30

    下列关于该新生管理信息系统的描述,正确的是(    )

    A、该新生管理信息系统是数据库管理系统 B、“姓名”字段设为主键,是合理的 C、“基本信息表”中同一字段的字段值的数据类型定相同 D、该数据表中必定有一个字段的字段名为“户籍所在地”
  • 14、下列应用中,不属于人工智能应用范畴的是(    )
    A、使用指纹解锁功能解锁手机 B、利用手持金属探测仪对旅客进行安检扫描 C、某“在线翻译”系统将英文文章翻译成中文 D、“无人驾驶汽车”在道路上行驶
  • 15、下列有关信息和信息处理的说法,正确的是(    )
    A、计算机中的信息是以十六进制形式存储的 B、声音、图像必须经过数字化后才有价值 C、文字、声音、图像等既是载体,也是信息的表达技术 D、算术运算和逻辑运算是计算机处理信息的基本运算
  • 16、某字符串加密算法,规则如下:

    1)根据字符串长度构建一个最小的n*n矩阵,将字符串中每个字符从左到右,自上而下顺序填入矩阵,不足部分用字符“*”代替;

    2)将矩阵转置(行列对换),然后将奇数行字母内码加上1,偶数行字母内码减1,字符为a、z或A、Z时做循环处理。比如,字符a减1为z;字符Z加1为A。

    3)按从左到右,从上而下依次取出字符,形成新的字符串。如图a为字符串“Go to the zoo.”的加密过程。编写VB程序,在文本框Text1中输入字符串,点击“加密”按钮,在文本框Text2中输出加密后的字符串。程序运行结果如图b所示。

    a

    b

    (1)、若在文本框Text1中输入3个字母“Far”,执行加密程序后,输出结果为
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码

    Dim a(1 To 100) As String, b(1 To 100) As String, n As Integer

    Private Sub Command1_Click()

        Dim s1 As String, s2 As String,i As Integer, j As Integer, m As Single

        s1 = Text1.Text

        m = Sqr(Len(s1))

        If m > Int(m) Then n = Int(m) + 1 Else n = m

        For i = 1 To n * n

            If i <= Len(s1) Then  a(i) = Mid(s1, i, 1)   Else  a(i) = "*"

        Next i

        For i = 1 To n

            For j = 1 To n

                b((i - 1) * n + j) =     ‘将矩阵转置

                b((i - 1) * n + j) = jm(i, j)   ‘内码变换

            Next j

        Next i

        s2 = ""

        For i = 1 To n * n

            s2 = s2 & b(i)

        Next i

        Text2.Text = s2

    End Sub

    Function jm(x As Integer, y As Integer) As String

        Dim s As String

        s = b((x - 1) * n + y)

        If s <= "Z" And s >= "A" Or s <= "z" And s >= "a" Then

            If x Mod 2 <> 0 Then

                If s <> "Z" And s <> "z" Then

                    s = Chr(Asc(s) + 1)

                Else

                    s = Chr(Asc(s) - 25)

                End If

            Else

                If s <> "a" And s <> "A" Then

                    s = Chr(Asc(s) - 1)

                Else

                    s =

                End If

            End If

        End If

        

    End Function

  • 17、某比赛项目由多位评委打分,然后根据项目难度系数计算最终得分。规则为:

    最终得分=(所有评委打分总和-1个最高分-1个最低分)×项目难度系数

    编写VB程序,实现计算最终得分的功能。在文本框Text1中输入项目难度系数和多位评委的打分,中间用“,”隔开并以“,”结尾,然后点击计算按钮,在文本框Text2中显示最终得分。程序运行界面如图所示。

    (1)、程序中计算按钮的对象名是  (单选,填字母:A .Command1/B .Cmd1/C .Cmd1_Click)。
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Private Sub Cmd1_Click()

        Dim a(1 To 100) As Single

        Dim i As Integer, j As Integer, k As Integer, m As Integer, n As Integer

        Dim Tot As Single, tmp As Single

        Dim s As String, v As String, ch As String

        s = Text1.Text

        n = 1:v=""

       

        Do While n <= Len(s)

            ch = Mid(s, n, 1)

            If ch <> "," Then

                v = v & ch

            Else

                a(m) = Val(v)

                

                m = m + 1

            End If

            n = n + 1

        Loop

        For i = 2 To m - 2

            For j = m - 1 To i + 1 Step -1

                If a(i) < a(j) Then

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

                End If

            Next j

        Next i

        Tot = 0

        For

            Tot = Tot + a(i)

        Next i

        Text2.Text =

    End Sub

    (3)、程序中加框处代码有错,请改正。
  • 18、用Flash软件打开“昆虫世界.fla”文件,部分编辑界面如图a所示。

    图a

    请回答下列问题:

    (1)、创作多媒体作品时需要对背景音乐进行处理,用Goldwave软件打开声音文件,界面如图b所示。下列描述正确的是               (多选,填字母)。

    图b

    A、当前处理的声音素材为Wav格式立体声 B、当前状态执行“删除”命令后,保留的声音时长为1分50秒 C、当前状态执行“剪裁”命令后,保留的声音时长为40秒 D、当前状态下执行“淡入”命令后直接保存,音频文件存储容量与原来一样 E、当前状态下执行“静音”命令后直接保存,音频文件存储容量将减少
    (2)、测试影片时,本场景播放结束后,蝴蝶还在扇动翅膀,声音还在继续播放,可知“蝴蝶”的元件类型为 , “背景音乐”图层中声音的同步类型为。(选填:事件/数据流)
    (3)、甲虫动画脚本为:沿树干上爬→左转→沿树枝左爬→变“昆虫”文字。若要将“世界文字”动画与甲虫变昆虫动画同步,则在“世界文字”图层中应进行的操作是
    (4)、测试影片时,单击当前场景中的“浏览”按钮,停止所有声音播放,同时在浏览器中显示出位于同一目录下的“kunchong.txt”文件内容,则“浏览”按钮的动作脚本为on(release){
  • 19、网上下载了第六次人口普查的相关数据,并用 Excel软件进行数据处理,如图a所示。

    图a

     请回答下列问题:

    (1)、区域 E4:G14的数据是通过公式计算得到的,在E4单元格中输入公式 , 再使用自动填充功能完成区域E5:E14和F4:G14的计算。

    (提示:占总人口比重=年龄段人口数÷总计人口数×100)

    (2)、对图a所示表格中数据按“性别比”降序排列,则应选择的数据区域为
    (3)、利用图a数据建立了“各年龄段人口比重”饼图,如图b所示。下列说法正确的是       (多选,填字母)。

    图b

    A、可以通过数据区“A4:B14”创建该图表 B、可以通过数据区“A4:A14,E4:E14”创建该图表 C、隐藏“0-9岁”所在行数据,图表不会发生变化 D、调整数据表中小数点位数,图表不会发生变化
  • 20、有如下 VB 程序段:

    s = "AAABBBCCCCDDEFF"

    i = 1: j = Len(s): Key = "H": v = ""

    Do While i <= j

        m = (i + j) \ 2

        c = Mid(s, m, 1)

        If c = Key Then Exit Do

        If c > Key Then

            j = m - 1: v = v & c

        ElseIf c < Key Then

           i = m + 1: v = v & c

        End If

    Loop

    执行完以上程序后,v的值为(   )

    A、CDFF B、CDF C、CDEF D、DEF
上一页 795 796 797 798 799 下一页 跳转