当前位置: 最新试题
  • 1. (2021高三上·浙江月考) 下列应用中,没有体现人工智能技术的是(    )
    A . 停车管理系统通过识别车牌进行计费 B . “识花”软件通过识别花草图像显示花草名称 C . 自动翻译机将普通话翻译成英语 D . 佩戴智能导游进人预设无线发射点后自动播放讲解
  • 2. (2021高三上·浙江月考) 某对分查找算法的VB程序段如下:

    Key= Val(Text1.Text)

    i=1: j=10: n=0

    Do While i<=j

        m=(i+j)\2

        n=n+1

        If a(m) : > Key Then

            j=m-1

        Else

            i=m+ 1

        End If

    Loop

    Text2.Text=str(n)

    数组元素a(1)到a(10)的值依次为“2,3,5,8,9,10,13,17,19,25”。在文本框Text1中输入待查找的整数,执行该程序段,则文本框Text2中显示3,待查找数不可能是(    )

    A . 2 B . 4 C . 9 D . i9
  • 3. (2021高三上·浙江月考) 现需要对某企业大型招聘活动面试成绩进行排名,面试数据包含专业编号(整数,顺序编号)、专业名称、姓名(字母编写)和面试分。整理面试数据的要求是:先按专业编号从小到大排列;然后,同专业的面试者按面试成绩从大到小排列(同分同名次)。按上述要求,编写一个VB程序,功能如下:在列表List1中显示整理前的数据,单击“整理”按钮Command1,整理结果显示在列表框List2中,程序运行界面如图所示。

    1. (1) n个元素两两比较大小,需要比较的次数是
    2. (2) 请在划线处填入合适的代码。

      Const n=200      '报名人数

      Const nz=10       '专业数

      Dim zybh(1 To n) As Integer, zyname(1 To n) As String, sname(1 To n) As String, zymark(1 To n) As Integer

      Dim b(1 To nz) As Integer           '存储每个专业的人数

      Dim c(1 To nz) As Integer

      Dim d(1 To n) As Integer

      Dim q(1 To n) As Integer

      Private Sub Form_ Load()

          '本过程读取专业编号、专业名称、姓名和面试分的数据分别存储在数组zybh,zyname,sname, zymark中,并在List1中显示,代码略

      End Sub

      Private Sub Command1_ Click( )

          Dim i As Integer, j As Integer, k As Integer, t As Integer, pos As Integer

          For i=1 To nz

              b(i)=0

          Next i

          For i=1 To n

              d(i)=0 : q(i)=0

          Next i

          For i=1 To n

              k= zybh(i)

              b(k)=b(k) + 1

          Next i

          k=1

          For i=1 To nz

              c(i)=k

              

          Next i

          For i=1 To n-1

              For j=i+1 To n

                 If zybh(i)= zybh(j) And zymark(i) < <> zymark(j) Then

                     If  Then

                         d(j)=d(j)+1

                     Else

                         d(i)=d(i)+1

                     End If

                 End If

              Next j

          Next i

          For i=1 To n

              j=0

              Do While

                  j=j+1

              Loop

              q(c(zybh(i))+d(i)+j)=i

          Next i

          For i=1 To n

              List2.AddItem "" & zybh(q(i)) & " " & zyname(q()) & " " & sname(q(i))& "" & zymark(q(i) & "" & d(q(i)) + 1

            Next i

      End Sub

  • 4. (2021三上·月考) My father ________ a doctor.
    A . is B . am C . are
  • 5. (2021三上·月考) ________ is my grandma.
    A . He B . she C . She
  • 6. (2021三上·月考) ________ my mother.
    A . Here's B . Here C . What's
  • 7. (2021三上·月考) Point to ________ arms.
    A . her B . you C . he
  • A . He is my English teacher. B . He is a doctor.
  • A . Point to her foot. B . Point to her nose.
  • A . Point to his ear. B . Point to his eyes.
上一页 3 4 5 6 7 下一页 共1000页