4.1.3 Python的运算符与表达式 知识点题库

设A=2,B= - 4，则表达式3*A>5 Or B+8<0的值是

编写“加法练习题生成器”程序，实现如下功能：在文本框Text1中输入题数n，单击“生成’’按钮Command1，在列表框List1中显示n个两数之和小于100的加法练习题。程序运行界面如图1所示。

在 Visual Basic 中，关系表达式 x/y=x\y 为真，则说明（  ）

编写“输出所有子串”程序，实现如下功能:在文本框Text1中输入字符串，在列表框List1中输出该字符串的所有子串并输出子串的总数。程序运行界面以及工程资源窗口如下图所示。

情报员小王在工作时发现R国会用一些对称字符(如ABBA、ABA、123321)进行通信。R国为防止通信内容被破解，会在对称字符的头、尾加一些无关字符，如:12ABBA、ABAKK、5123432198。因此小王编写了一个VB程序，用于读取通信字符串中最长的对称字符。在文本框Text1中输入通信字符，单击“读取”按钮 Command1，在标签Label2中显示最长的对称字符，程序运行界面如图所示。请完善代码。

Private Sub Command1_Click()

Dim x As String, n As Integer, i As Integer

Dim k As Integer, start As Integer

Dim max As Integer

x = Text1.Text: n = Len(x)

max = 0: start = 1

For i = 1 To n

 k = n

 Do While k > i

  IfAnd k - i + 1 > max Then

  max = k - i + 1

  start=i

 End If

 Loop

Next i

Label2.Caption =“最长回文字符串为” + Mid(x, start, max)

End Sub

Function isPa(t As String) As Boolean ’判断是不是回文数

Dim i As Integer

For i = 1 To Len(t) \ 2

 If Mid(t, i, 1) <> Mid(t, Len(t) - i + 1, 1) Then isPa = False

Next i

End Function

有下列VB程序段：

Dim strA As String, strB As String

strA = "hongda"：strB = ""

For i = 1 To Len(strA) * 2

If i / 2 = Int(i / 2) Then

strB = strB + Chr(Asc(Mid(strA, (i - 1) Mod Len(strA) + 1, 1)) + 2)

End If

Next i

该程序段运行后，变量strB的值是（  ）

某算法的部分流程图如图所示，执行这部分流程后，变量a，b的值分别是（  ）

用VB编写求句子中最长单词的程序。输入要求：句子以“.”结束；单词之间用空格分隔，单词没有缩写形式和其他特殊形式。运行界面如图所示程序功能：在文本框 Text1中输入待统计的句子，单击“统计”按钮 Command1，将结果显示在文本框Text2和Text3中。

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

排序前	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 Command1_ click ( )

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

Dim flag As Boolean, sl As String, s2 As String

‘ 读取一组正整数,存储在数组a中

‘ 代码略

For i = 1 To n

  s1 = s1 + Str(a(i))

Next i

Text1. Text = s1

For i = 1 To n-1

        ‘①

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

    Else flag = False

    For j = i + 1 To n

      If IsPrime (a(j)) Then

        If       Then    ‘②

          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

  ‘依次输出排序后的数据

  ‘代码略

  For i=1 To n

    s2 = s2 + Str(a(i))

  Next i

  Text2. Text = s2

End Sub

Function IsPrime (m As Integer) As Boolean

‘ 本函数判断整数m是不是素数。是素数返回值为True，不是素数返回值为False

‘ 代码略

End Function

加框①处代码应改为。

加框②处代码应改为。

下列VB表达式中，值最大的是（  ）

下列VB逻辑或关系表达式中，输出结果为“真”的是（   ）。

仪仗队队员对身高H的选拨要求是：高于1.85米，但不能超过1.90米。下列表达式正确的是（  ）

小刘记录了某地每天最高气温和最低气温，现要编写VB程序，计算一周内最大温差（当日最高气温与最低气温之差）。功能如下：在文本框Text1中依次输入本周内每天的最高气温与最低气温（数据都用逗号分隔并以逗号结尾），单击“计算”按钮Cmd后，程序计算出最大温差，结果显示在Label1中。界面设计如下图所示：

有如下VB程序段：

Dim s As String

s="浙江杭州市"

If Len（s）>=5 Then

  s=Mid（s，3，2）

Else

  s=Mid（s，1，2）

EndIf

该程序段运行后，s的值为（  ）

若x是能被7整除的正整数，下列表达式一定成立的是（    ）

① x mod 7=0     ② x\7=0    ③ Int(x/7)=x/7      ④ x/7=x\7

下列表达式的计算结果与x mod 10的计算结果一样的是（    ）

设a=2，b=5，在python中，表达式a>b And b>3的值是（    ）

VB表达式20 Mod 3 ^ 2 + Not 1 + 99 = 99 < 2的值是（      ）

下列Python程序段运行的结果是

s = 0

i = 1

while i <= 100:

    if i % 10 != 0 :

        s+= i

        i+ =1

print(s) （       ）

下列VB表达式的值为True的是(    )