ZUJUAN.COM组卷网基于海量中小学题库的在线组卷网站
当前位置:手动组卷 >高中信息技术 >按章节
时间 使用次数
过滤已使用的试题 vip
防超纲选题 vip
  • 1. (2021高二下·浙江期中) 采用冒泡排序算法对某数据序列进行排序,经过第一轮排序后的结果是“2,8,3,6,7,5,9”,那么原数据序列不可能的是(   )
    A . 8,3,6,7,5,2,9 B . 8,3,6,7,2,5,9 C . 2,8,3,9,6,7,5 D . 8,3,6,7,2,9,5
  • 1. (2021高二下·浙江期中) 有如下VB程序段:
    s = "spring winter":s1 = ""

    n = Len(s)

    For i = 1 To n \ 2

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

        Else

            s1 = Mid(s, n - i + 1, 1) + s1

        End If

    Next i

    Text1.Text = s1

    执行该程序后,在文本框Text1中显示的是 (   )

    A . wprtnr B . sptnnw C . rtwprn D . wntspn
  • 1. (2021高二下·浙江期中) 有两个字符串s1、s2(s2中字符不重复),若s2中的字符按顺序在s1中依次出现,则称s2是s1的子串。例:s1="acde",s2="ce",则s2是s1的子串。实现该功能的VB程序段如下:

    s1 = Text1.Text: s2 = Text2.Text

    i = 1: j = 1

    Do While i <= Len(s1) And j <= Len(s2)

        If Mid(s1, i, 1) = Mid(s2, j, 1) Then  

    Loop

    If  Then Label1.Caption = "是子串" Else Label1.Caption = "不是子串"

    方框处的可选语句为:

    ①i = i + 1        ②j = j + 1    ③i > Len(s2)  ④j > Len(s2)

    以下选项正确的是(   )

    A . ①②③ B .   ①②④ C .   ②①③ D .   ②①④
  • 1. (2021高二下·浙江期中) 若x是能被7整除的正整数,下列表达式一定成立的是(    )

    ① x mod 7=0     ② x\7=0    ③ Int(x/7)=x/7      ④ x/7=x\7

    A .   ①② B .   ①③④ C .   ①②④ D . ①③
  • 1. (2021高二下·浙江期中) 一名商人在A地采购了n吨大米(n<=150),需要船只运送到B地。现在码头上停靠着10艘船,载重量在15到30吨之间且均不相同,同时运费单价(单位:元/吨)也存在差异。为了找出运费总数最少的方案,该商人先将10艘船的运费单价从小到大排序,若船只运费单价相同,则按船只载重量大到小排序。上述步骤完成后,将n吨大米依次装入排好序的船只中,若最后一只船装不满,则按实际装运大米的重量付运费。程序运行界面如16题图所示:单击“排序”按钮后,船只信息按照要求排序并在列表框List1中输出;在文本框Text1中输入大米总数n吨,单击“计算”按钮,将在列表框List2中列出所选船只编号,并在文本框Text2中显示运费总数。

    1. (1) 若图中7号船的载重量由“28”改为“22”,现有60吨大米需要运送,则该商人应选择的船只编号为 ________(若有多个编号,用“,”隔开)
    2. (2) 实现上述功能的VB程序如下,请在划线处填入合适的代码。

      Dim yf(1 To 10) As Integer, v(1 To 10) As Integer, b(1 To 10) As Integer

      Private Sub Command1_Click()

          Dim n As Integer, i As Integer, j As Integer, t As Integer

          List1.AddItem "船只编号" + " " + "载重量" + " " + "运费单价" List2.AddItem "船只编号"

          For i = 1 To 10     '对船只进行编号

              b(i) = i

          Next i

          '随机生成10艘船的运费单价,数值在100到200之间,代码略

          For i = 1 To 10    '随机生成10艘船载重量,载重量均不相同

              v(i) = 15 + Int(Rnd() * 16)

              For j = 1 To i - 1

                  If v(i) = v(j) Then________ : Exit For

              Next j

          Next i

          For i = 1 To 9

              For j = 10 To i + 1 Step -1

                  If________ Then

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

                  End If

              Next j

          Next i

          '在list1中输出10艘船的编号、载重量、运费单价,代码略

      End Sub

      Private Sub Command2_Click()

          Dim n As Integer, k As Integer

          Dim sum As Long

          n = Val(Text1.Text): sum = 0 k = 1

          Do While n > 0

              If n >= v(b(k)) Then

                  ________

              Else

                  sum = sum + n * yf(b(k))

              End If

              List2.AddItem Str(b(k)) n = n - v(b(k))

              k = k + 1

          Loop

          Text2.Text = Str(sum)

      End Sub

  • 1. (2021高二下·浙江期中) 王老师收集了学校高一英语周竞赛的数据,并使用Excel软件对数据进行处理,如图a所示。

    图a

    1. (1) 如图a所示,高一01班总分平均Y4单元格的公式为________。
    2. (2) 需要找出年级排名前十的同学颁奖,以下方法可行的有     (多选,填字母)。
    3. (3) 根据图a中数据制作的图表如图b所示,创建该图表的数据区域是________。

      图b

  • 1. (2021高二下·浙江期中) 使用UltraEdit软件观察字符“2021 JX建党百年”的内码,部分界面如图所示。

    下列说法正确的是(    )

    A . 字符“2”的内码占两个字节 B . 字符“X”的十六进制码是“4A” C . 字符“j”的二进制码是“01001010” D . 图中有8个ASCII码字符
  • 1. (2021高二下·浙江期中) 有一个整数数列(长度为n),数值的规律为先升序,后相等,最后降序。如3,6,18,18,10,9,8,7,5,现要找到升序的终点位置,即第一个18所在的位置3,将数列依次存入数组a,部分程序如下:

    i=1: j=n

    Do While i<=j

        m=(i +j)\2

        If  Then

            i= m+1

        Else

            j=m- 1

        EndIf

    Loop

    Text1.Text=

    若要实现上述功能,方框处的代码应是(  )

    A . a(m - 1) <= a(m)  Str(j) B . a(m - 1) < a(m)      Str(j) C . a(m - 1) <= a(m)  Str(i) D . a(m - 1) < a(m)     Str(i)
  • 1. (2021高二下·浙江期中) 找出一个随机数列(长度为n)中的最长非降序段,计算其长度。非降序段中如果存在连续相等的数,则忽略,如非降序段2,3,4,4,5,长度计为4。

    编写如下VB程序,实现上述功能。运行程序,在文本框Text1中输入随机数列“19,21,3,5,18,18,18,23,25,10,11,12,17,17,7”,单击“统计”按钮,在文本框Text2中输出5。

    程序运行界面如图所示。

    1. (1) 观察程序界面,窗体中至少包含________个对象。
    2. (2) 实现上述功能的VB程序如下,请在划线处填入合适的代码。

      Dim a(1 To 100) As Integer     '数组a依次存放数列中的数Dim n As Integer

      Private Sub Command1_Click( )

          Dim i As Integer, k As Integer, max As Integer, t As Integer Dim s As String, ch As String

          s = Text1.Text n = Len(s)

          i = 1: k = 1

          Do While i <= n

              ch = Mid(s, i, 1)

              If ch <> "," Then ________ Else k = k + 1 i = i + 1

          Loop

          i = 1: max = 0

          Do While i <= k

              t =________

              If t > max Then max = t i = i + t

          Loop

          Text2.Text = Str(max)

      End Sub

      Function length(p As Integer) As Integer        '函数功能是计算a(p)开始的非降序段长度

          Dim j As Integer, c As Integer

          j = p: c = 1

          Do While j <= n – 1

              If  Then

                  If a(j) < a(j + 1) Then c = c + 1 Else

                  Exit Do

              End If

              j = j + 1

          Loop

          length = c

      End Function

    3. (3) 程序加框处代码有错,请改正。
  • 1. (2021高二下·浙江期中) 下图Flash编辑界面中,“music”图层里的声音素材是采样频率为32kHz、量化位数为16bit、双声道未经压缩的Wave格式音频文件。场景动画播放到当前帧时声音素材刚好完整地播放了一遍。则该声音素材的存储容量约为(    )

    A . 125KB B . 250KB C . 500KB D . 1000KB
1 2 3 4 5 下一页 共1000页