4.1.2 Python的数据类型 知识点题库

下列可作为VB变量名的是(   )
A . 4A B . D_Y C . Y + X D . And
下面(   )不是字符型常量。 
A . “你好” B . “  ” C . “True” D . #False#
用语句Dim A(-3 To 3) As Integer 所定义的数组的元素个数是(  )
A . 3 B . 4 C . 6 D . 7
【加试题】数字个数统计。编写VB程序,实现如下功能:在文本框Text1中输入仅由ASCII码字符组成的字符串(长度不超过100),单击“数字统计”按钮Command1,在列表框List1中输出字符串中包含的不同数字及其相应的个数,程序运行效果如下图所示。

  1. (1) 为方便调试,要让程序每次运行时文本框Text1中的初始内容为“ab12*{}78ab12()778ab34”,应修改文本框Text1的属性。
  2. (2) 实现上述功能的VB程序如下,请在划线处填入合适代码。

    Private sub command1_click()

      Dim a(0 to 9) as integer   ‘数组元素a(i)中存放数字i的个数

      Dim s as string , ch as string

      Dim t as integer

      For i=0 to 9

        a(i)=0

      next i

      s=text1.text

      for i=1 to len(s)

            

        if ch>=”0”and ch<=”9” then

            t=

            a(t)= a(t)+1

        end if

      next i

      list1.clear

      for i=1 to 9

      if a(i)<>0   then

        list1.additem  ”数字:”+str(i)+ ”,共有”+ str(a(i))+ ”个”

      end if

      next i

    end sub

  3. (3) 与上述程序中加框处代码运行效果等价的条件表达式可以是
下列不属于VB合法常量的是(  )
A . “123” B . FALSE C . #09/08/98 # D . 4+9
随机产生10个[12,20]间的随机整数放在A数组中,打印最大的和最小的。请完善程序:

  PRIVATE SUB FORM_CLICK()

 

  MAX=0: MIN=21

FOR I= 1 TO 10

   A(I)=

  IF THEN   MAX=A(I)

  IF THEN  MIN=A(I)

NEXT I

PRINT “最大数是”;MAX ,”最小数是” ;MIN

END SUB

实现某排序算法的部分VB程序如下:(  )

For i =1 To 6

  k=i

  For j = i+1 To 7

    If a(j) < a(k) Then k = j

  Next j

  If i <> k Then

    t = a(i): a(i) = a(k): a(k) = t

  End If

Next i

在排序过程中,经过某一遍排序“加工”后,数组元素a(1)到a(7)的数据依次为“10,41,75,12,63,11,85”,则下一遍排序“加工”后数组元素a(1)到a(7)的数据依次是(  )

A . 10,11,41,75,12,63,85 B . 10,11,75,12,63,41,85 C . 11,12,7,3,418 D . 10,11,12,41,63,75,85
有如下VB程序段:

For i= 1 To 49

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

  Do While a(j)=5

    a(j)=0

    j = j + 1

    a(j) = a(j) + 1

  Loop

Next i

数组a中各元素初始值均为0,该程序执行后,数组a中各元素之和为(  )

A . 9 B . 0 C . 3 D . 49
小王与小李合作编写一个成绩统计的VB程序:小王编写一个过程,该过程从数据库读取某一指定科目的相关数据,存储在数组a中;小李编写一个过程,该过程依据数组a中的相关数据统计各班级平均分,小王与小李约定的数组a各元素含义如下表所示。

数组元素

数组元素的含义

a(1)

存储班级数n

a(2)

从a(2)到a(n+1)依次存储第

1、第2、……第n个班级的人数

a(n+1)

a(n+2)

从a(n+2)开始依次存储第1个班级每个学生的单科成绩、第2个班级每个学生的单科成绩、……、第n个班级每个学生的单科成绩

程序功能如下:在文本框Text1中输入科目名称,单击“读数据库”按钮Command1,程序从数据库读取数据;单击“开始统计”按钮Command2,程序进行统计处理,结果输出在列表框List1中。程序运行界面如图所示。

实现上述功能的VB程序如下,请回答下列问题:

  1. (1) 根据程序运行界面中的数据及数组a各元素的含义进行分析,数组元素a(5)的值为(填写数值)。
  2. (2) 分析程序,可知数据库的文件名为
  3. (3) 请在划线处填入合适的代码。

    Dim a(1 To 600)As Integer   '数组大小满足处理要求

    Private Sub Command 1_Click()

      '本过程由小王完成,从数据库读取指定科目的各相关数据,存储在数组a中

      Dim conn As New ADODB.Connection

      Dim rs As New ADODB.Recordset

       conn.ConnectionString =" provider = Microsoft. ACE.

       OLEDB.12.0;datasource="+"Score.Accdb"

       conn.Open

       Set rs.ActiveConnection=conn

       '本过程的其他语句略

    End Sub

    Private Sub Command 2_Click()

      '本过程由小李完成,依据数组a中的相关数据统计各班级平均分

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

      Dim p As Integer,sum As Integer,aver As Single

             ①       

      p=n+2

      For i=1 To n

        sum=0

        For j=1 To a(i+1)

                 ②    

          p=p+1

        Next j

        aver=sum/a(i+1)

        Listl. Addltem Str(i)+""+Str(a(i+1))+""+Str(aver)

      Next i

    End Sub

     ②

有一组正整数,要求仅对其中的素数进行升序排序。排序后素数在前,非素数在后。排序示例如下。

排序前

86

71

5

41

81

79

37

89

排序后

5

37

41

71

79

89

86

81

实现上述功能的VB代码如下,但加框处有错,请改正。

Const n=8

Dim a(1 To n)As Integer

Private Sub Commandl_Click()

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

Dim flag As Boolean

'读取一组正整数,存储在数组a中,代码略

For i= 1 To n-1

        '(1)

    If IsPrime(a(k))Then flag = True Else flag = False

    For j = i + 1 To n

      If IsPrime(a(j)) Then

        If  Then    '(2)

          k=j

          flag = True

        End If

      End If

    Next j

    If k <> i Then

      t=a(k):a(k)= a(i):a(i)= t

    End If

    If Not flag Then Exit For     'Exit For表示退出循环

Next i

'依次输出排序后的数据。代码略

End Sub

Function IsPrime(m As Integer)As Boolean

'本函数判断m是不是素数:是素数返回值为True,不是素数返回值为False

'代码略

End Function

 ⑵ 

有如下VB程序段:

For i=1 To 9

For j=10 To i+2 Step-1

If a(j)<a(j-2) Then

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

End If

Next j

Next i

数组元素a(1)到a(10)的值依次为“3,17,2,14,15,6,7,18,9,4”,执行该程序段后,数组元素a(8)中的值为(    )

A .   3 B .   4 C .   15 D .   17
在VB中,如果要定义变量p用于存储某学校学生总数,那么变量p的数据类型是(  )
A . String B . Integer C . Boolean D . Date
数的输出和占位。输入一个实数(double范围内的正实数 a),请你按如下要求输出: 第一行按双精度默认输出, 第二行双精度数输出共占 10 位,其中 3 位小数,右对齐,左补空格并在两端添加星号包裹, 第三行双精度数输出共占 10 位,其中 3 位小数,左对齐,右补空格并在两端添加星号包裹。
完善程序实现以下功能并保存。

输出数组的最大值。

arr1 =[12, 435, 76, 24, 78, 54, 866, 43]

 = -32768

for i in range(0,7):

    if arr1[i] > max1 : max1 =

print("最大值是:",)

input("运行完毕,请按回车键退出...")

已知字符串a="python",则a[-1]的值为
以下语句的运行结果是(    )

pwd= {" Name" : "User", "Password" :"@YueKao108"}

pwd["Name* ]=" Administrator"

print(pwd["Name"][:4])

A . "User" B . "resU" C . "Admi" D . "Admin"
若有a=[1,2,3,4,5],则表达式a[2]+a[4]的值为6。
在 VB的基本数据类型中以下(  )占4字节内存空间。
A . 整型 B . 布尔型 C . 日期型 D . 单精度型
列表是Python中常用的序列类型,和变量样是可变的。以下关于列表的描述正确的是(       )
A . 列表中的元素索引不能为负值 B . 列表中元素的值可以修改 C . 列表中的元素不能是列表类型 D . 列表中元素的数据类型必须是一样的
已知一个有7个节点的单向链表,设有头指针head和尾指针tail,如图所示,下列操作需要遍历多个节点的是(    )

A . 删除该链表中的最后一个节点 B . 删除该链表中的第一个节点 C . 在该链表第一个节点前插入一个新节点 D . 在该链表最后一个节点后插入一个新节点
最近更新