相关试卷

  • 1、某算法部分流程图如图所示,执行该部分流程图后,变量s和变量i的值分别为(    )

    A、9 和 5 B、16 和 7 C、16 和 5 D、9 和 7
  • 2、某算法的部分流程图如图所示。执行这部分流程,若输入s的值为“yummy”,则输出的ch、t值分别为(   )

    A、"y",1 B、"m",1 C、"y",5 D、"m",4
  • 3、计算机能直接识别和执行的是下列哪种语言。(      )
    A、高级语言 B、汇编语言 C、机器语言 D、自然语言
  • 4、下列问题不能用算法描述的是(  )
    A、输入圆的半径,求圆的面积      B、输入十位同学的身高,求他们的平均身高 C、输入三个数,求这三个数的最大数  D、输出所有3的倍数
  • 5、有流程图如下图所示,其功能是将键盘输入的数进行相加,当输入的数为0时输出它们的和,则图中虚线部分的内容是(   )

    A、 B、 C、 D、
  • 6、求矩形面积s的部分流程图如下图所示,矩形的长、宽分别用变量a、b表示,对于框①和框②的作用,下列说法正确的是( )

    A、框①用于输入a和b的值,框②用于输出s的值 B、框①用于输出a和b的值,框②用于输出s的值 C、框①用于输入a和b的值,框②用于输入s的值 D、框①用于输出a和b的值,框②用于输入s的值
  • 7、学校对各班级的文艺汇演成绩做了评分,并利用Excel软件进行数据处理,部分界面如下图表格所示。

    (1)、用公式计算出各班级得分,可在I3单元格输入公式,再利用自动填充得到其他班级得分,则I6单元格上的公式为
    (2)、将各年级最后得分最高的班级设为该年级的一等奖,下列方法可得到高二年级一等奖班级的是                  (多选,填字母)。
    A、选择区域B8:I12,再按“列I”为关键词进行降序排序后,该区域的第1条记录为高二年级一等奖班级 B、先筛选出“班级”开头是“高二”的记录,再筛选出“最后得分”为最大1项的记录,筛选结果即为高二年级一等奖班级 C、先筛选出“最后得分”为最大1项的记录,再筛选出“班级”包含“高二”的记录,筛选结果为高二年级一等奖班级 D、先按“最后得分”升序排序,再筛选出“班级”包含“高二”的纪录,最后一条记录为高二年级一等奖班级
    (3)、根据上图表格中的数据制作的图表如下图所示,创建该图表的数据区域为

  • 8、某省2014年主要统计数据表,放置于Excel工作簿“Sheet1”工作表中,如图1所示。

    图1

    (1)、为了使表格的标题合并及居中放置,应先选择B2:E2单元格,然后在“单元格格式”对话框图中(如图2所示)做如下设置:

    图2

    (2)、去年总量的计算公式是:去年总量=总量/(1+增幅),要计算去年总量,则应先在E5单元格中输入公式 , 然后在自动填充E6:E13单元格。
    (3)、在计算出去年总量后,先制作一张反映表格中数据的柱状图,再对表格数据按增幅进行降序排序,(如图3所示),先选中单元格 , 然后选择“数据”菜单中的“排序”,在打开的排序对话框中设置主要关键字为“增幅”,进行降序排序。

    图3

    (4)、完成排序后,请问对步骤⑶中生成的柱状图是否有影响?
  • 9、家乐超市某日饮料零售情况统计表,放置于Excel工作簿“Sheet1”工作表中,如图1所示。

    图1

    (1)、为了方便管理,在编号列中对各商品进行编号(S01、S02、S03…S09),现已经编好S01和S02,用方法可以快速的完成剩下的商品编号。
    (2)、要计算每种商品的销售额占合计销售额的比重,可以先选中F3单元格,然后在编辑栏中输入 , 然后用自动填充功能填充F4:F11单元格。
    (3)、选中B2:B11和E2:E11数据,然后在此工作簿的“Sheet2”工作表中建立图表如图2所示,可以看出这是一幅 , 依据图表可以看出,此图表的图标选项对话框中数据标志标签内的设置(如图3)中哪些选项会是打勾选择的?

    图2

    图3

  • 10、Excel电子表格可以利用函数功能进行成绩统计,但是也有其缺陷,如果数据中有若干缺考被填写了0分,可能会影响统计结果的是(   )
    A、单科排序 B、计算学科平均分 C、计算个人总分 D、查找最高分
  • 11、在Word2003中编辑表格,无法进行的操作是(    )。
    A、拆分单元格 B、合并单元格 C、固定行高、列宽 D、旋转表格
  • 12、(多选)在Excel中,要计算区域A2:C2中所有数据的平均值,正确的公式是(    )。
    A、=A2+C2 B、=(A2+B2+C2)/3 C、=SUM(A2:C2) D、=Average(A2:C2)
  • 13、在Excel中,求数据的总和可以使用函数(   )。
    A、SUM B、MAX C、MIN D、AVERAGE
  • 14、(多选)关于Excel 2010的“排序”功能,以下描述正确的有:(     )。
    A、可以按行排序 B、可以按列排序 C、排序条件最多支持64个关键词 D、可以自定义序列排序
  • 15、如下图所示,向下拖动“拖动柄”到C4单元格,则C4单元格的值是(    )。

     

    A、3 B、7 C、30 D、15
  • 16、在Excel中,不可以对数据进行的操作是________。
    A、索引 B、排序 C、筛选 D、分类汇总
  • 17、在Excel中工作表中,单元格D5中有公式“=$B$2+C4”,删除A列后C5单元格中的公式为 (   ) 。
    A、=$A$2+B4 B、=$B$2+B4 C、=$A$2+C4 D、=$B$2+C4
  • 18、(多选)关于Excel 2010的“排序”功能,以下描述正确的有 (   ) 。
    A、可以按行排序 B、可以按列排序 C、排序条件最多支持64个关键词 D、可以自定义序列排序
  • 19、编写一个VB程序,实现如下功能:输入s位数字构成的数字字符串(第1位数字不为0),移除k (0<k<s)个数字后,在保证原数字相对位置不变的情况下,使剩余数字组成的新数为最小(注:新数第1位不能为0)。例如8个数字构成的数字字符串“71803296”,移除3个数字,得到5位数字构成的最小数是“10296”,具体算法如图a所示。

    算法分析:要使得到的5位数字最小,首先需保证能取到5个数字,且首位应尽量小,那么取首位数的范围应保证余下有4个数字,即在前4位中选最小非0的数字。

    程序运行时,在文本框Text1中输入一个数字字符串,在文本框Text2中输入要移除的数字个数,单击“运行”按钮CmdRun后,在标签Labell显示得到的最小新数,程序运行界面如图b所示。

    (1)、程序运行时,若要在名为Form1的窗体标题上显示“删数”,可以在Form  Load事件处理过程中添加语句为(单选,填字母:A . Form1. Text ="删数"\B . Form1. Caption ="删数"\C . Form1. AddItem"删数")
    (2)、实现上述功能的VB程序代码如下,请在划线处填入合适的代码。

    Private Sub CmdRun_ Click()

    Dim Num As String,New_num As String     ' Num为输入的数字字符串

    Dim i As Integer, j As Integer, m As Integer,

    Dim As Integer, s As Integer, k As Integer

    Dim a(30) As String, b(30) As Integer

    Num = Text1. Text: s = Len(Num)

    k = Val (Text2. Text)      'k为删除数字个数

    For  i=1  To  s

        a(i) = Mid(Num,i,1)

    Nexti

    j =1

    m=1

    n=

    For i=m+l To n      '取第一个非零最小数字

        If     Then m=I     '加框处程序代码有误,请改正

    Next i

    b(j)= m

    Do While  '取其他最小数字

        m=m+1

        n=n+1

        For i=m+1 To  n

            If  a(i) < a(m) Then m= i

        Next i

        j =j+1:b(j)=m

    Loop

    For i= m+1 To  s     '最后直接取的数字

        j =j+1:b(j)=i

    Next i

    For j=1 To s- k       '输出最小数

        New_ num =

    Next j

    Labell. Caption = New_num

    End Sub

    (3)、加框处程序代码有误,请改正。
  • 20、亲戚寻找。小李总是因为认不清亲戚而苦恼,于是他设计了如下程序来模拟亲戚寻找的过程。已知:如果1和2是亲戚,1和3是亲戚,则2和3也是亲戚。代码思维如下:

    1)将每个人看成是一个钩码,能挂在另一个挂钩底下,自己底下也能挂其他挂钩。

    2)如果两个钩码在同一条钩码串上,则为亲戚(如2、3都能找到1)。

    3)如果两个是亲戚但不在一串钩码上,则可将其中一串的最上面的钩码挂在另一串的下方。

    例如从图a加框处的前三行数据可得到图b所示的钩码串1和钩码串2,从第四行数据可知9、5也为亲戚,则可将两串钩码合并,合并后3为2的顶端,5为3的顶端,其余数据以此类推。

    根据算法思想,编写VB程序功能如下:程序初始化时给出6条亲戚关系显示在List1中,单击“理关系”按钮,在List2中显示每个人所在钩码的顶端编号。在Text1和Text2中分别输入两人的编号,单击“询问”按钮,输出两个人是否为亲戚关系。程序运行界面如图a所示。

    (1)、根据图a数据,若输入两人的编号为4和5,则两人的关系是否为亲戚(填:是/否)。
    (2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Const n = 9              '总人数

    Const m = 6              '已知的亲戚关系数

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

    Dim f(1 To n) As String    '记录不同的亲戚钩码串成员,每条亲戚钩码串内互为亲戚

    Dim k As Integer           '亲戚钩码串的数目

    Private Sub Form_Load()

     '初始化List1和List2,生成m条亲戚关系,每条亲戚关系的编号对应存储在数组a(i)和b(i) '中,在List1中输出a(i)和b(i),代码略

    End Sub

    Private Sub Command1_Click()

        Dim i As Integer, x As Integer, y As Integer

        f(1) = a(1) + b(1)     '利用a(1)、b(1)生成第一条钩码串存储在f(1)中

        k = 1                  'k为钩码串编号

        For i = 2 To m

            x = root(a(i), 0): y = root(b(i), 0)  'x为调用函数获取a(i)所在的钩码串编号

            If x = 0 And y = 0 Then k = k + 1:  '根据x与y分类讨论

            If x <> 0 And y = 0 Then f(x) = f(x) + b(i)

            If x = 0 And y <> 0 Then f(y) = f(y) + a(i)

            If x <> y And x <> 0 And y <> 0 Then   'x、y在不同钩码串则将两条钩码串合并

                f(x) = f(x) + f(y): f(y) = f(k): k = k - 1

            End If

        Next i

        For i = 1 To n         '输出每个人所在钩码的顶端编号

            x = root(CStr(i), 0): y = root(CStr(i), 1)  'Cstr()函数用于去除字符前导空格

            If x <> 0 Then

                If y = Len(f(x)) Then List2.AddItem Str(i) + "  " + CStr(i)

                If y <> Len(f(x)) Then List2.AddItem Str(i) + "  " +

            End If

        Next i

    End Sub

    '按钮Command2的功能为判断输入的两个人是否为亲戚关系,代码略

    Function root(a As String, b As Integer) As Integer  '参数a表示待查找目标,参数b

    '表示返回值类型,0表示返回目标所在钩码串编号,1表示返回目标在该钩码串中的位置

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

    m = 0: n = 0: i = k: j = 0

        Do While i > 0

            If a = Mid(f(i), Len(f(i)) - j, 1) Then m = i: n = Len(f(i)) - j: Exit Do

            j = j + 1

            If j = Len(f(i)) Then i = i - 1: j = 0

    Loop   

    If  Then root = m Else root = n

    End Function

上一页 581 582 583 584 585 下一页 跳转