3.2 数据与结构 知识点题库

设计人口普查程序,用一个变量表示海南省的人口总数,这个变量的类型应是(   )
A . 整型 B . 实型 C . 长整型 D . 双精度型
Visual Basic允许的常量有(   )。 
A . E7 B . 4.8E2 C . 2.5*10 D . E-5
下面(   )不是字符型常量。 
A . “你好” B . “  ” C . “True” D . #False#
编写VB程序,实现如下功能:在文本框Text1中输入某一年份,单击“天干地支与生肖”按钮Command1,在列表框List1中输出该年份开始的12个年份及对应的“天干地支”与“生肖”,运行界面如图所示,程序代码如下。

_x0000_i1042

  1. (1) 代码“Private Sub Command1_Click()”中的Click是         。(单选,填字母)
    A . 对象名 B . 属性名 C . 事件名
  2. (2) 为实现上述功能,请在划线处填入合适的代码。

    Private Sub Command1_Click()

    Dim a As Integer, b As Integer

    Dim i As Integer, n As Integer

    Dim c1 As String, s1 As String

    Dim c2 As String, s2 As String

    Dim c3 As String, s3 As String

    List1.Clear

    s1 = "甲乙丙丁戊己庚辛壬癸"

    s2 = "子丑寅卯辰巳午未申酉戌亥"

    s3 = "鼠牛虎兔龙蛇马羊猴鸡狗猪"

    n = Val(Text1.Text)

    For i = n To

       a = (i + 6) Mod 10

       b = (i + 8) Mod 12

       c1 = Mid(s1, a + 1, 1)

       c2 = Mid(s2, b + 1, 1)

       c3 = Mid(s3, b + 1, 1)

       List1.AddItem + "年" + c1 + c2 + " " + c3

    Next i

    End Sub

  3. (3) 由上述算法可知,2024年对应的“天干地支”为
下列 VB 程序段中:

Dim i as Integer, max as Integer Dim a(1 to 10) as Integer

‘代码略,随机产生 10 个不重复的数存于数组 a 的 10 个元素 a(1)~a(10)中max=a(1)

For i=2 to 10

       If a(i)>a(max)  then  max=i Next i

变量 max 用于存储(   )

A . a(2)~a(10)的最大值 B . a(1)~a(10)的最大值 C . a(2)~a(10)的最大值在数组中的下标值 D . a(1)~a(10)的最大值在数组中的下标值
下列可作为Visual Basic变量名的是(  )。
A . a#a B . 4a C . DIMA D . Const
以下程序段运行后,文本框Text1中显示的内容是(  )

Private Sub Command1_ Click ( )

Dim a(10) As Integer

For 1 = 1 To 10

    a(1) = 0

Next i

For i = 1 To 10

    a(i Mod 3) = a(i Mod 3)+i

Next i

Text1. Text = Str(a(1))

End sub

A . 15 B . 18 C . 22 D . 12
在一个数组中存储了若干个学生的技术成绩小题分,其中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

    ,②,③

Python不支持的数据类型是(    )
A . int B . float C . char D . list
(约瑟夫问题)n个人围成一圈,从第1个人开始从1报数,数到3的人出圈;再由下一个人继续从1开始报数,数到3的人出圈……输出依次出圈的人的编号和最后一个留在圈里的人的编号。如输入n=8,则依次出圈的人的编号是3,6,1,5,2,8,4,最后留在圈内的是7号。

以下VB程序在a数组中保存了下一个要报数的人的编号,即若。(w)=p,则表示当第w个人报过数2后,下一个要报数的是第p号。程序在列表框Listl中输出了依次出圈的人的编号,在标签Label1中输出了最后剩下的人的编号。请完善程序。

Private Sub Command1_Click( )

  Dim i As Integer, n As Integer, w As Integer, num As Integer

  Dim a(1 To 100)As Integer, t As Integer

  n=Val(Text1.Text)

  For i=1 To n-1

      a(i)=i+1

  Next i

  a(n)=1

  w=n        ‘变量w表示当前检查的是第w号数组元素,即从第n号开始检查

  t=0       ‘变量t用以模拟报数

  Do While   ①   

      num=a(w)    ‘当前报数的人的编号

      t=t+1

      If t=3 Then

          List1.AddItem Str(num)

        a(w)=   ②   

        t=0

      Else

             ③   

      End If

  Loop

      Label1.Caption=Str(w)

End Sub

以上程序段运行时,为了实现上述功能,画线处应填入的代码分别为:①;②;③

某银行为了提升服务质量,需设计一个计算机程序,用于回答用户如下问题:“m元钱需要存多少年(m为大于等于5的整数),才能得到至少k元本息?”假定该银行某款理财产品的储蓄和盈利方式为:①存期以年为单位,存款以元为单位;②不论存期的长短,年利率均为3.7%;③不计复利。

请用Python语言回答下列问题:

  1. (1) 若变量m用于存储本金,变量k用于存储本息,则变量m的数据类型为,变量k的数据类型为
  2. (2) 若变量y表示储蓄年份,则用m、k表示y的Python赋值方法为 。
  3. (3) 为提高程序的可读性,请将变量m重新命名为
  4. (4) 变量命名的过程中需要注意什么?(至少写出2点)
运行如下程序段时,出现了如图所示的错误提示框:

Private Sub Command1_Click()

Dim r As Single, s As Single            '①

r="10米"                     '②

s=3.14159*r*r            '③

Text2.Text ="某个半径为"+ Str(r)+"米的圆,其面积为"+ Str(s)+"平方米."             '④

End Sub

则程序中出错的语句是(   )

A . B . C . D .
有如下VB程序段

Const n=11

Dim a(1 To n) As Integer,y(1 To n) As Integer, i As Integer, j As Integer

k=Val (Text1.Text)

For i=1To n

    y(i)=1

Next i

For i=1 To n

    For j=1 To n

        If a(i) < a(j) Then y(i)=y(i)+1

    Next j

    If y(i)=k Then Text2.Text=Text2.Text+Str(a(i))

Next i

数组a的各元素的值为“3,4,3,1,4,4,5,5,6,2,0”,在文本框Text1中输入4,执行该段程序后文本框Text2中显示的值为(    )

A . 4 4 4 B . 4 4 C . 3 D . 3 3
列表q=[1,2,3,4,5,6],删除列表数值1,下列代码不能实现此功能的代码是(    )
A . del q[1] B . del q[0] C . q.pop(0) D . ABC都不可以。
阅读程序。分析代码并回答问题。

list=['a','b','c','d','e','f','g']

list1=[]

list2=[]

for i in range(7):

    if i%2==0:

        list1.append(list[i])

else:

    list2.append(list[i])

print(list1)

print(list1)

 

  1. (1) list的数据类型是
  2. (2) list中的元素的数据类型
  3. (3) list1=[ ]的作用是
  4. (4) for i in range(7)语句中,i的实际数据范围是从
  5. (5) append(list[i])的作用是
列表在Python中作用非常强,列表可以包含多个数据元素,同时它是一个(     )。
A . 变量 B . 无序集合 C . 有序集合 D . 常量
请描述列表和元组之间的区别,以及分别在他们之间转型?
逻辑型数据可以转换为数值型数据,其中True转换为转换为0 。
有如下 VB 程序段:

a(1) = 10

For i = 2 To 10

    a(i) = 0

    If i Mod 2 = 1 Then

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

    Else

        a(i) = a(i) + 1

    End If

Next i

该程序段执行后,数组元素a(7)的值是(  )

A . 2 B . 10  C . 11 D . 12
从离地500米的空中自由落下一个小球,求从开始落下的时刻起,小球在最后1秒内的位移(重力加速度g以9.8米/秒2计)。程序如下,回答以下问题。

import math

h = 500

g = 9.8

t = math.sqrt(2*h/g)

hx = g*(t-1)*(-1)/2

hh = h-hx

print(“小球最后1秒下落的位移是:”, hh, "m")

  1. (1) 该程序代码中使用了库,库的名称是(   )。
    A . Limport B . math C . sqrt D . Print
  2. (2) 该程序代码中使用了常量,它的名称是(   )。
    A . h B . t C . 500 D . Hh
  3. (3) 该程序代码中使用了变量hh,它的数据类型是(   )。
    A . int B . float C . 列表 D . 字符串
  4. (4) 该程序中print(“小球最后1秒下客的位移是:”,hh,“m”),其中“m”的数据类型是(   )。
    A . int B . float C . 列表 D . 字符串
  5. (5) 该程序使用了物理公式计算空中自由落下个小球的位移,采用的算法处(   )。
    A . 解析算法 B . 穷举算法 C . 递归法 D . 选择排序