ZUJUAN.COM組卷網基于海量中小學試題庫建立的在線組卷系統
當前位置:手動組卷 >高中信息技術 >按章節
時間 使用次數
過濾已使用的試題 vip
防超綱選題 vip
  • 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. 數組a中存儲的是左右交替上升的n個正整數,如下表所示:

    a(1)

    a(2)

    a(3)

    a(n-2)

    a(n-1)

    a(n)

    3

    25

    38

    55

    31

    12

    依據對分查找思想,設計一個在數組a中查找數據key的程序。實現該功能的VB程序如下,但加框處代碼有誤,請改正。

    Private Sub Command1_Click( )

      Const n=6

      Dim a(1 To n)As Integer,flag As Boolean

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

      ‘讀取一組正整數,按上述規則存入數組a中,代碼略

      key=Val(Text1.Text)

      i=1

      j=(n+1)\2

      flag=False

      Do While  And Not flag    ‘①

          m=(i+j)\2

          If key=a(m)then

              flag=True

          Elself key <a(m)then

              j=m-1

          Else

              i=m+1

          End If

      Loop

      If Not flag And j>0 Then

                              ‘②

          If key=a(m)Then flag=True

      End If

      If flag Then

          Text2.Text=Str(m)

      Else

          Text2.Text= "找不到"

      End If

    End Sub

    以上程序段運行時,為了實現上述功能,加框處代碼應改正為:①________;②________。

  • 1. 數組a中有100個正整數,已按升序排列。在文本框Text1中輸入一個正整數key,尋找數組a中是否有一數對的和等于給定的數key。若存在和為key的數對,輸出該數對所包含的兩個整數,小數在前,大數在后。若有多個數對滿足條件,則輸出最先找到的數對;若找不到符合要求的數對,則輸出“沒有符合條件的數對”。小吳為此編寫了VB程序,代碼如下,但加框處代碼有誤,請改正。

    Dim a(1 To 100)As Integer

    Const n=100

    Private Sub Command1_Click( )

      Dim key As Integer, left As Integer, right As Integer, mid As Integer

      Dim flag As Boolean

      flag=False:key=Val(Text1. Text)

      For i=1 To n-1

                           ‘①

        right=n

        Do While        ‘②

            mid=(left +right)\2

            If a(i)+a(mid)<key Then

                left=mid+1

            ElseIf a(i)+a(mid)>key Then

                right=mid-1

            Else

                List1. AddItem Str(a(i))&" "&. Str(a(mid))

                flag=True

            End If

        Loop

      Next i

      If Not flag Then List1.Addltem"沒有符合條件的數對"

    End Sub

    以上程序段運行時,為了實現上述功能,加框處代碼應改正為:①________;②________。

  • 1. 某對分查找算法的VB程序如下:

    Key=Val(Text1.Text)

    i=1:j=9

    Do While i<=j

        m=Int((i+j)/2)

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

    Loop

    若數組元素a(1)到a(9)的值分別為“10,13,13,15,18,18,18,25,28”,且在文本框Text1中輸入的是18,執行該程序段后,變量j的值是(  )

    A . 7 B . 6 C . 5 D . 4
  • 1. 采用如下對分查找算法對數組a中的7個有序數據“15,38,51,66,77,81,99”進行查找,要查找的數據為“55”,程序段如下:

    i=1:j=7:x=55

    Do While i<=j

          m=(i+j)\2

          If a(m)=x Then Exit Do

          If a(m)>x Then j=m-1 Else i=m+1

    Loop

    執行完上述程序段后,根據最終變量值判斷下列表達式,其中正確的是(  )

    A . i=m+1 B . i=m-1 C . j>m+1 D . j<m-1
  • 1. 某對分查找算法的VB程序段如下:

    i=1:i=7:s=""

    Key=Int(Rnd*100)

    Do While i<=j

        m=(i+j)\ 2

        If Key=a(m)Then

          s=s+ "M":Exit Do    ‘Exit Do表示退出循環

        ElseIf Key<a(m)Then

          j=m-1:s=s+"L"

        Else

          i=m+1:s=s+"R"

        End If

    Loop

    Text1.Text=s

    數組元素a(1)到a(7)的值依次為“24,35,38,41,45,69,78”。若該程序段執行后,文本框Text1中顯示的內容可能是(  )

    A . RL B . LMR C . RLR D . LRLM
  • 1. 某對分查找算法的VB程序如下:

    Key=Val(Text1.Text)

    i=1:j=6

    n=0:f=False

    flag=False

    Do While i<=j And Not f

        n=n+1

        m=Int((i+j)/2)

        If key=a(m)Then f=True

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

    Loop

    若數組元素a(1)到a(6)的值依次為“3,9,12,17,28,39”,在文本框Text1中輸入17后運行該程序,則以上程序段運行結束后,下列說法不正確的是(  )

    A . 變量i的值為4 B . 變量j的值為4 C . 變量m的值為4 D . 變量n的值為4
  • 1. 已知數組元素a(1)到a(9)的值依次為“19,28,37,46,55,64,73,82,91”,若在Text1中輸入29,并執行如下程序段后,Text2中顯示的內容是(  )

    Key=Val(Text1.Text)\10

    Text2.Text=""

    i=1:j=9:f=False

    Do While i<=j And Not f

        m=(i+j)\2

        If a(m)Mod 10=Key Then

            search=m:f=True

        ElseIf a(m)Mod 10>Key Then

            i=m+1

        Else

            j=m-1

        End If

    Text2.Text=Text2.Text+Str(m)

    Loop

    A . 5,2 B . 55,37,28 C . 55,28,37 D . 5,7,8
  • 1. 數組變量d(1)到d(8)的值依次為87,76,69,66,56,45,37,23,在用對分查找法找到“69”的過程中,依次被訪問到的數據是(  )
    A . 69 B . 66,69 C . 66,76,69 D . 56,66,76,69
  • 1. 在有序單詞序列“bike,cake,data,easy,feel,great,hive,mark,sweet”中,用對分查找算法找到“easy”的過程中,依次被訪問到的數據為(  )
    A . feel,data,easy B . great,data,easy C . bike,cake,dada,easy D . feel,cake,data,easy
1 2 3 4 5 下一頁 共1000頁
高频彩输20万怎么办 金身救世报 快乐8走势图 福彩快乐12 全民欢乐捕鱼官方网站 cs真人游戏—官方网址 环球彩票平台下载安装 内蒙古快三今日推荐号 北京时时彩几号开奖 澳洲幸运8计划 北京pk10官网下载 股票交易行情 怎么样制作棋牌app 内蒙推倒胡麻将下载 彩票开奖查询 快乐十分钟预测软件 体彩福建11选5开奖结果