第四章 程序设计基础 知识点题库

下列不属于VB合法常量的是(  )
A . “123” B . FALSE C . #09/08/98 # D . 4+9
有如下VB程序段:

s=0

For k =3 To 1 Step-1

    If k <=1 Then x=1

    If k <=2 Then x=2

    If k <=3 Then x=3

    s=s+x

Next k

Text1. Text= Str(s)

该程序段运行后,文本框Text1中显示的内容是(  )

A . 9 B . 7 C . 6 D . 5
有如下VB程序段:

Dim s As String, i As Integer, n As Integer

Dim ch As String, ans As Integer

s= Text1.Text

n Len(s): ans=0

For i=1 To n

    ch =Mid (s, i, 1)

    ans =ans *2+ Val(ch)

Next i

Text2 Text ans

若程序运行后Tex2中显示的是“38”,则Text中输入的是(  )

A . 100110 B . 209 C . 45 D . 19
有如下VB程序段:

Dim s(1 To 6) As String

Text1.Text = ""

For i= 1 To 5

  For j=i+1 To 6

  If s(i) + s(j)< s(j) + s(i) Then

    t= s(j): s(j)= s(i): s(i)=t

  End If

  Next j

Next i

For i=1 To 6

  Text1.Text = s(i) + Text1.Text

Next i

如果程序运行,一开始当数组元素s(1)到s(6)的值依次为“4","343","312","12","246","121",运行该段代码后,文本框Text1中显示的内容为(  )

A . 434331224612121 B . 434331224612112 C . 343312246121124 D . 121122463123434
以下函数运算中结果不是5的是(  )
A . Int(-5.0) B . Abs(-5) C . Sqr(25) D . Len("20201")
有如下VB程序段:

n = 8

For i = 1 To n

a(i) = Int(Rnd() * 10) + 1 Next i

For i = 1 To n \ 2

If a(i) < a(i + 1) Then p = i: q = i + 1 Else p = i + 1: q = i For j = i + 2 To n - i + 1

If a(j) < a(p) Then q = p: p = j

ElseIf a(j) < a(q) Then q = j

End If Next j

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

If i = q Then q = p

If n - i + 1 <> q Then t = a(q): a(q) = a(n - i + 1): a(n - i + 1) = t

 Next i

执行该程序段后,a(1)~a(8)各元素可能的值为(    )。

A . 1,2,4,6,7,8,9,10 B . 2,6,8,9,11,9,7,5 C . 10,8,6,5,3,6,7,9 D . 1,3,5,8,10,7,5,3
某市对一户一表居民实行阶梯电价,电费计算方式如下:月用电量在1-50千瓦时部分不调价;月用电量在51-200千瓦时部分,电价每千瓦时上调0.03元;月用电量超过200千瓦时部分,电价每千瓦时上调0.10元。

若假定某用户一个月的用电量为x千瓦时,当前单价为p元/千瓦时,则计算标准如下:当x≤50时,电费为p×x元;当50<x≤200时,电费为p×x+(x-50)×0.03元;当x>200时,电费为p×x+4.5+(x-200)×0.1元。

程序设计界面如下图所示,程序的功能是:在文本框Text1中输入用电量x(单位:千瓦时),在文本框Text2中输入电量p(单位:元),单击“计算”按钮(Command1)后,在标签Label4中输出计算结果。

  1. (1) 实现上述功能的VB程序如下,请在划线处填入合适的代码。

    Private Sub Command1_Click()

    Dim x As Single, p As Single

    Dim s As Single

    x =

    p =        '此处改错

    If x <= 50 Then

        s = p * x

       

        s = p * x + (x - 50) * 0.03

    Else

        s = p * x + 4.5 + (x - 200) * 0.1

    End If

    Label4.Caption = "本月的电费为:" +  + "元"

    End Sub

  2. (2) 程序代码中加框处代码有误,请改正。

    改正:

用变量myBook存储书籍名称(如“唐诗三百首”),则变量myBook的数据类型应为(  )
A . Integer B . Single C . String D . Date
有如下VB程序:

a=2:b=5

If b>=a Then a=a+2

b=b+2

If b Mod 2=1 Then b=b*a+1

Text1.Text=Str(b)

程序运行后,文本框Text1上显示的内容为

小明编写了一个进制转换程序。程序运行时在文本框Text1中输入十进制数,单击“计算”按钮Command1后,结果在文本框Label1中显示。程序运行界面如图a所示。

  1. (1) 要使命令按钮上显示的“计算”改为“转换”,可在其属性窗口(图b)中将属性的属性值修改为“转换”。
  2. (2) 实现上述功能的VB程序如下,请在画线处填入合适的代码。

    Private Sub Command1_Click( )

      Dim ch As String

      Dim n As Integer, x As Integer

      Dim ans As String

      ch="0123456789ABCDEF"

      n=    ①    

      Do While n>0

        x=n Mod 16

           ②   

        ans=   ③   

      Loop

      Label2.Caption="16进制:"+ans

    End Sub

    画线处应填入的代码为:①;②;③

将下列程序代码补充完整:

某同学参加了学校体检,体检的医生告诉他体重超重,需要加强运动。该同学了解到运动时,心率如能控制在一定范围内,对增强心血管系统和呼吸系统的功能都有很好的效果;超出范围,对身体反而会有损伤。男最适宜运动心率=(220-年龄数-安静心率)×(60%~80%)+安静心率,女最适宜运动心率=(210-年龄数-安静心率)×(60%~80%)+安静心率,补充程序帮他(她)计算最适宜的运动心率。

age=float(input('请输入age='))

HRrest=float(input('请输入HRrest='))

gender=input(“请输入male or female :”)

if

    

else:

 

low=(n-age-HRrest)*0.6+HRrest

high=(n-age-HRrest)*0.8+HRrest

print('最适宜的心率是:',low,'~',high)

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

凡是加上了双引号的字符、数字等都是字符串。
下面Python代码运行后,a、b的值为(      )

a=23

b=int(a/10)

a=(a-b*10)*10

b=a+b

print(a,b)

A . 23 2 B . 30 20 C . 30 32 D . 3  2
程序中的表达式是按照一定的规则组合而成的,代数式 对应的Python表达式是(r1、r2和r3分别对应变量 )(      )
A . B . r1/(r1+r2)u C . r1/(r1+r2)·u D . r1/(r1+r2)*u
4的立方使用python语言怎么表示(    )
A . 4*3 B . 4**3 C . 43 D . 4**2
下列Python代码运行的结果是(    )

n=8

m=float(n)

print(m)

A . 8.0 B . 8 C . m D . n
下列迭代程序执行结果是(  )。

jc =1

for i in range(1,5):

jc *= i

print(jc)

A . 1 B . 6 C . 24 D . 120
阅读下列程序,写出运行结果。

m = int(input("请输入一个正整数:"))

x = m

y = m

for i in range (9):n = int(input("请输入一个正整数:"))

if n<x :

x = n

if n<y :

y = n

print(x, y)

程序运行后,依次输入:12   35   9   11   23   88   13   19   29   55

运行结果是:

有如下程序段

Private Sub Command1_ Click()

    Dim s As String,a As String,b As String

    Dim t As Long,sum As Long

    s= Text1. Text+".”

    t=0: sum= 0

    For i=1 To Len(s)- 1

        a= Mid(s, i, 1)

        b= Mid(s, i+1, 1)

        If (a>= "0" Anda<= "9") And (b >= "0" And b <= "9") Then

            t=t * 10+ Val(a)

        ElseIf (a >= "O" And a <= "9") And(b<= "0" Or b>= "9") Then

            t=t *10+Val(a)

            sum= sum- t

            t=0

        End If

    Next i

Text2.Text= Str( sum)

End Sub

程序运行时,在文本框Text1中输入“yy2019mm03dd12”,单击按钮Command1后,在文本框Text2中显示的内容为(    )

A . 20190312 B . 2322 C . -2304 D . -2034
某同学编写以下Python程序代码

s=0

While s<=30 :

  s=s+10

Print(s)

该程序循环的次数是(     )。

A . 3 B . 5 C . 6 D . 4
最近更新