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

在Visual Basic中,下列能作为变量名的是(   )。
A . 5a B . If C . Abs D . Tea
VB中保存工程文件的文件扩展名为(   )
A . vbp B . frm C . doc D . pas
有如下VB程序:

Private Sub Command1_Click()

 Dim a(1 To 5) As Integer

 a(5)=Val(Text1.text)

 For i=4 To 1 Step -1

   a(i)=a(i+1)\2

 Next i

 Label1.caption=str(a(1))

End sub

在文本框Text1中输入“100”,单击命令按钮Command1后,标签Label1中显示的内容是(  )

A . 25 B . 6 C . 12 D . 50
实现如下程序:输入一个非负数,将该数各位上的数字反转得到一个新数。得到的新数,除了原数为0外,反转得到的新数最高位不应为0。程序运行时,在文本框Text1输入数字,单击按钮Command1后在文本框Text2上输出结果。程序界面如图所示。实现上述功能的VB程序如下,在划线处填入合适的代码。

Private Sub Command1_Click()

Dim a As String, n As Integer

a = Text1.Text

Do While n > 1 And Mid (a, n, 1) = “0”

Loop

For i = n To 1 Step -1

 Text2.Text =

Next i

End Sub

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程。

  Privat Sub Command1 Click

      Dim array1(10,10) As Integer

      Dim i AS integer, j As Integer

      For i = 1 To 3

          For j = 2 To 4

              array1(i,j) = i + j

          Next j

      Next i

  Text1.Text=array1(2, 3)+array1(3, 4)

  End Sub

程序运行后,单击命令按钮,在文本框中显示的值(  )

A . 12 B . 13 C . 14 D . 15
有如下程序段:

Const n=6

Dim a(1 To n)As Integer

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

Do While True

  For i=1 To n-1

      If a(i)>a(i+1)Then Exit For

  Next i

  If i < n Then

      For i=1 To n

        j=Int(Rnd * 6)+1

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

      Next i

  Else

      Exit Do

  End If

Loop

数组中a(1)到a(6)的值依次为“56,34,48,87,65,96”,上述程序段执行后a(1)到a(6)的值依次为(  )

A . 96 87 65 56 48 34 B . 344856658796 C . 选项A和B都有可能 D . 选项A和B都不可能
在一个数组中存储了若干个学生的技术成绩小题分,其中a(1)存储学生个数,从a(2)开始按顺序存储小题分数据。每个学生有33个小题的数据,例:a(2)—a(13)是“学生1”的信息客观题得分,a(27)—a(30)是“学生1”的信息主观题得分;a(14)—a(26)是“学生1”的通用客观题得分,a(31)—a(34)是“学生1”的通用主观题得分。

具体如下表:

小李根据上述描述,设计了一个统计所有学生信息各题得分率的算法。程序运行后,首先在列表框List1中显示信息技术各小题得分,单击“计算”按钮“Command1”,在列表框List2中显示信息各题的题号和得分率,并在文本框Text1中输出所有学生的信息平均分(平均分=各题得分率*分值之和)。

算法的VB程序如下,回答下列问题。

  1. (1) 根据题目描述,使用如图所示数据,a(95)的数值是
  2. (2) 在程序划线处填上合适代码,使程序完整。

    Dim a(1 To 1000) As Integer, n As Integer

    Private Sub Form_Load()

    ‘读入数据到数组a,数据个数n,代码略

    End Sub

    Private Sub Command1_Click()

    Dim i As Integer, j As Integer

    Dim fz(1 To 16) As Integer       'fz数组存储信息各题满分值

    Dim b(1 To 33) As Single     '数组b存储全卷各题的平均得分

    For i = 1 To 16      '数组fz存储信息16个小题的满分值

    If i <= 12 Then fz(i) = 2

     fz(13) = 4: fz(14) = 8: fz(15) = 7: fz(16) = 7

    Next i

    For i = 2 To n       '把数组a数据分别统计到各题中,计算各题总得分

       ①  

     b(j) = a(i) + b(j)

    Next i

    For i = 1 To 33

     If i <= 12 Then

     b(i) = b(i) /(a(1) * fz(i))        '计算信息客观题各题的得分率

     ElseIf i >= 26 And i <= 29 Then

     b(i) =   ②  

     End If

    Next i

    For i = 1 To 16

     If i > 12 Then j = i + 13 Else j = i

     b(j) = Int(b(j) * 1000 + 0.5) / 10         '对结果四舍五入保留1位小数

     List2.AddItem Str(i) + Str(b(j)) + "%"

     ave=   ③  

    Next i

    Text1.Text = Str(ave / 100)

    End Sub

    ,②,③

   在程序执行过程中,其值允许改变的量称为
下列选项中,能作为VB程序变量名的是(   )。
A . s+1 B . 3stu C . true D . s1
下列语句正确定义了一个单精度实数型变量x 的是( )。
A . Dim x As Single B . 其它三项都不对 C . Dim x As Integer D . Dim x As String
某VB 程序段如下:

i = 1: s = ""

Do While i <= 3

k = i : j = i + 1

Do While j <= 8

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

j = j + 1

Loop

If i <> k Then

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

n = n + 1

End If

s = s + Str(a(i)) : i = i + 1

Loop

Label1.Caption = Str(n) + ":" + s

数组a(1)到a(8)依次为:16,19,8,20,4,12,6,15,程序运行后,标签中显示的值为(    )

A .   2:4 6 8 B .   2:8 6 4 C .   3:4 6 8 D .   3:8 6 4
完善以下程序代码。

程序描述:计算两个浮点数a和b的相除的余数,a和b都是正数。这里余数(r)的定义是:a = k * b + r,其中 k是整数, 0 <= r < b。代码如下:

a=    ①     (input("请输入:"))

b=    ①     (input("请输入:"))

k=   ② 

r=   ③ 

print(r)

  1. (1) ①处的语句是           
    A . int B . float C . a%b D . a/b
  2. (2) ②处的语句是           
    A . a**b B . a//b C . a%b D . a/b
  3. (3) ③处的语句是           
    A . a//b B . a-kb C . a-k*b D . a+kb
对一个n×n的矩阵以“行”为单位进行升序排序,如下表所示是一个4×4的矩阵以行为单位进行升序排序。

小杜编写了实现上述功能的程序,程序功能如下:程序运行时,在文本框Text1中输入n(1<=n<=10),单击“产生”按钮Command1产生n×n个随机数,随机数的范围为[0,9],随机存储在数组a中,并以矩阵的形式在列表框List1上显示单击“排序”按钮Command2,对矩阵以“行”为单位进行升序排序,并在列表框List2输排序后的矩阵。在程序运行界面如下图所示,实现上述功能的VB程序如下,请在划线处填入合适的代码。

Dim n As Integer

Dim a(1 To 100) As Integer

‘随机生成数并存储在List1中,代码略

Private Sub Command1_Click()     ‘按行排序

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

    Dim s As String

    s=“”

    For i=1 To

        k=i

        For j=i+1 To

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

        Next j

        If k<> i Then t = a(k): a(k)=a(i): a(i)=t

        If I Mod n=0 Then List2.AddItem s: s=“”

    Next i

End Sub

Private Sub Command2_Click()     ‘按列排序

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

    Dim s As String

    s= “”

    For i=1 To i-1

        k=i

        For j= i+n To

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

        Next j

        If k<> i Then t=a(k): a(k)=a(i): a(i)=t

        If I Mod n=0 Then List2.AddItem s: s= “”

    Next i

End Sub

已知 x = [3, 5, 7] ,那么执行语句 x[1:] = [2] 之后,x 的值为
下列选项中不属于Python基本数据类型的是(   )。
A . int B . float C . list D . bool
列表在python中的作用非常强大,它可以包含多个数据元素,下面是列表的数据元素(    )。
A . 整数 B . 浮点数 C . 字符串 D . 以上都是
下列字符串比较大小时,最小的是(    )
A . "abc" B . "aab" C . "abcc" D . "aa8"
已知6月份10位技术考试成绩:

1

2

3

4

5

6

7

8

9

10

78

88

89

90

83

76

75

98

100

65

技术老师想统计出80分(含80)以上的人数,请完善程序,代码如下:

a=[78,88,89,90,83,76,75,98,100,65]

sum=0

for i in range(n):

    if a[i]>=80:

print(sum)

执行上述程序段后,输出的内容是

已知:S="杭州亚运 2022",下列说法正确的是 (    )
A . S[1:4]的值是: "杭州亚运" B . S[1:5]的值是: "杭州亚运" C . S[:-1]的值是: "2" D . S[::-1]的值是: "2202运亚州杭"
下列属于字符串常量的是(   )。
A . cnt         B . 3.14             C . 2018          D . "Visual Basic"