大红鹰娱乐网基于海量中小学试题库建立的在线大红鹰娱乐系统
当前位置:手动大红鹰娱乐 >高中信息技术 >按章节
时间 使用次数
过滤已使用的试题
防超纲选题
  • 1. 下列有关信息的说法,正确的是(  )
    A . 计算机中的信息是以十六进制形式存储的 B . 计算机信息处理能力只与CPU有关 C . 离开计算机网络,信息便无法传递 D . 使用加密技术可以提高信息的安全性
  • 1. 下列关于Access数据表的说法,正确的是(  )
    A . 数据表中的字段数可以为0 B . 同一数据表中各记录的字段数是相同的 C . 数据表中有记录时,该表的字段类型无法修改 D . 在数据表中不能通过“导入Excel电子表格”的操作来添加记录
  • 1. 【加试题】小明基于冒泡排序思想设计了一个改进的排序算法。该算法先用冒泡法将数组a中奇数位置的元素、偶数位置的元素分别进行排序,然后再进行后续处理。算法的VB程序段如下,但加框处代码有错,请改正。

    ’待排序数据存储在数组a中(a(1)~ a(n)),要求升序排列

    For i = 1 To (n - 1) 2

        For j = 1 To n - i * 2

            If   Then      ‘⑴

                t = a(j): a(j) = a(j + 2): a(j + 2) = t

            End If

        Next j

    Next i

    For i = 1 To n 2

        j = 2 * i - 1

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

    Next i

    For i =   Step 2      ‘⑵

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

        Do While t < a(j) 

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

        Loop

        a(j + 1) = t

    Next i

    ⑴{#blank#}1{#/blank#} ⑵{#blank#}2{#/blank#} 

  • 1. 电子邮局协议(POP3)用于(  )
    A . 从收件人电子邮件服务器中将邮件读到收件人计算机中 B . 从发件人计算机中将邮件发送到发件人电子邮件服务器中 C . 从发件人电子邮件服务器中将邮件发送到收件人电子邮件服务器中 D . 从发件人计算机中将邮件发送到收件人电子邮件服务器中
  • 1. 【加试题】有1个升序排列的数组a(a(1)~a(n),n≥3),从左到右相邻两个元素的差值(后一个元素值减去前一个元素值)先由小到大、再由大到小,且相邻两个差值不相等,为了查找相邻两个元素的最大差值,小李编写的VB程序段如下:

    i = 1 :j = n

    Do While i + 1 < j

        m = (i + j) 2

        If a(m + 1) - a(m) > a(m) - a(m - 1) Then

         

        Else

         

        End if

    Loop

    Label1.Caption="相邻两个元素的最大差值是" + Str(a(j) - a(i)) 

    上述程序段两个方框处的语句分别为(  )

    A . ① i = m ② j = m B . ① i = m      ② j = m - 1 C . ① i = m + 1  ② j = m – 1 D . ① i = m + 1  ② j = m
  • 1. 【加试题】给定m个区间和1个数组(有n个元素),现要求根据各区间限定的取值范围,将数组依次分隔成m+1个段。具体分割方法如下:

    第1段是从数组首个元素开始、元素值都属于第1区间的最长连续元素段。如果首个元素不属于第1区间,则第1段元素个数为0;

    第1段分割后的剩余元素,用同样的方法来依次分割第2段、第3段、…、第m段;

    第m段分割后的剩余元素分割到第m+1段(剩余段)。

    若第p(1≤p≤m-1)段末尾连续元素的值也同时属于第p+1区间,则这块连续元素称为第p段“重叠块”,该段其余部分称为第p段“非重叠块”。由于不存在第m+1区间,这里特别规定:第m段的全部元素都分割到m段“非重叠块”,第m段“重叠块”的元素个数为0,一个数组分段示例如下图。图中数组第1个元素10不属于第1区间[0,5],因此第1段的元素个数为0。10和20属于第2区间,而33不属于第2区间,因此第2段只包含10和20两个元素。第3段末尾连续3个元素的值也同时属于第4区间,因此,第3段“非重叠块”包含33,58,46,第3段“重叠块”包含55,62,69。

     

    1. (1)给定2个区间依次为[10,50]、[30,80],数组各元素为“12,44,34,45,66,50,45,70”,则第1段“重叠块”中的元素个数为{#blank#}1{#/blank#}个。
    2. (2)小李根据上述描述,设计了一个统计各段“非重叠块”、“重叠块”和剩余段中元素个数的算法。算法的VB程序如下,请在划线处填入合适的代码。

      Const n = 18, m = 6

      Dim a(1 To n) As Integer

      Dim b(1 To 2 * m) As Integer

      'b(1)、b(2)为第1区间的下限和上限, b(3)、b(4)为第2区间的下限和上限,…

      Dim c(1 To 2 * m + 1) As Integer

      '数组c用于保存统计结果:

      'c(1)、c(2)分别存储第1段“非重叠块”和“重叠块”的元素个数,

      'c(3)、c(4)分别存储第2段“非重叠块”和“重叠块”的元素个数,…

      'c(2m-1)存储第m段"非重叠块"元素个数,c(2m)存储第m段"重叠块"元素个数(值为0)

      'c(2m+1)存储剩余段元素个数

      Private Sub Command1_Click()

          Dim i As Integer, p As Integer, L As Integer, LL As Integer

          ‘读取n个数据并保存在数组a中,代码略

          ‘读取m个区间的下限和上限并保存在数组b中,代码略

          For i = 1 To 2 * m + 1

            c(i) = 0

          Next i

          i = 1: p = 1

          L = 0: LL = 0

          Do While    ①  

            If IsIn(i, p) Then

               If IsIn(i, p + 1) Then

                  LL = LL + 1

               Else

                      ②  

                  LL = 0

               End If

               i = i + 1

            Else

               c(2 * p - 1) = L

               c(2 * p) = LL

               L = 0: LL = 0

               p = p + 1

            End If

          Loop

          If i <= n Then

            c(2 * p - 1) = n - i + 1

          Else

        c(2 * p - 1) = L

        c(2 * p) = LL

          End If

          ‘输出统计结果,代码略

      End Sub

      ‘函数IsIn用来判断a(i)值是否属于第p区间

      Function IsIn(i As Integer, p As Integer) As Boolean

          If p > m Then

            IsIn = False

          Else

            If   ③     Then IsIn = True Else IsIn = False

          End If

      End Function

      ①{#blank#}1{#/blank#} ②{#blank#}2{#/blank#} ③{#blank#}3{#/blank#} 

  • 1. 使用Photoshop软件制作“风筝”作品,部分界面如题所示。下列说法正确的是(  )

    A . 不能将“知了”图层移动到“纸鸢”图层的下方 B . 使用“文字工具”可将“文字”图层中的汉字字体改为楷体 C . 执行“自由变换”命令可以改变“诗句”图层中文字大小 D . 将“背景”图层设置为不可见后,保存成的JPEG格式图像背景透明
  • 1. 小王设计“模拟撤销”程序,需要用一个“历史记录”,“历史记录”是在对字符串s进行插入或删除时,将每步操作信息依次存储得到的,操作信息由操作符(“+”表示插入,“-”表示删除)、操作位置和操作字符串(只包含英文字母)构成,例如,“+23abc”表示在字符串s第23个位插入了“abc”,“模拟撤销”过程按照“历史记录”的逆序进行,将字符串s的内容恢复到初始状态。对字符串“Book”的操作与撤销过程,如a所示。

    图a

    图b

    小王编写的“模拟撤销”VB程序如下,文本框 Text1中的内容是撤销前字符串,文本概Text2中的内容是历史记录,单击“撤销”按钮Command1后,在标签Label1中显示撤销过程,程序运行界面如图b所示。

    1. (1)实观上述功能的VB程序如下,在程序中出现的对象没有Caption属性的是{#blank#}1{#/blank#} 。(选填,填字码:A .Label1  /B .Command1  /C .Text1和Text2)
    2. (2)请在划线处填入合适代码。

      Private Sub Command1_Click()

          Dim s As String, t As String, ch As String

          Dim c As String, num As String, ss As String

          Dim n As Integer, i As Integer

          s = Text1.Text: t = Text2.Text

          c = "": num = "": ss = s

          For i = Len(t) To 1 Step -1

                  ①     

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

                  c = ch + c

              ElseIf ch >= "0" And ch <= "9" Then

                  num = ch + num

              Else

                  n = Val(num)

                  If ch = "-" Then

                      s = Mid(s, 1, n - 1) +    ②  

                  Else

                      s = Mid(s, 1, n - 1) + Mid(s, n + Len(c), Len(s) - n - Len(c) + 1)

                  End If

                  ss = ss + "→" + s

                  c = "": num = ""

              End If

          Next i

          Label1.Caption = ss

      End Sub

      ①{#blank#}1{#/blank#} ②{#blank#}2{#/blank#}

    3. (3)运行该程序,若文本框Text1中的内容是"April",文本框Text2中的内容是“-3p+3ri-6e”,单击撤销按钮,For循环语句执行完成后,字符串s的值是{#blank#}1{#/blank#}。
  • 1. 某算法的部分流程图如图所示。执行这部分流程后,输出c,s的值分别是(  )

    A . 8,10 B . 10,14 C . 12,6 D . 12,24
  • 1. 【加试题】一副未经压缩的1100×1024像素的BMP图像文件,其存储容量约为1.07MB,则该图像每个像素色彩编码的位数为(  )
    A . 4 B . 8 C . 16 D . 24
1 2 3 4 5 下一页 共540页