算法及程序语言基础 知识点题库

下列程序的功能是从键盘上任意输入一个数，判断这个数是正数，负数，还是零，并输出判断结果。程序中横线处有错误，请改正。【根据2011年高考总复习填空题改编】

    Private sub Command1_Click()

        Dim a As Single

        Dim py As String

             a= Val (Text1)  （1）

           If a>0 Then py =”正数”

           If a=0 Then py=”零”

           If a<0 Then py=”负数”

              Label3.Caption=a（2）

     End Sub

小明编写了如下VB程序段：

Private Sub Command1_Click()

  Dim x As Double

  Dim y As Double

  x = Val(Text1.Text)

  y = Abs(x)

  x = int(y)

  Text2.Text = Str(x)

End Sub

此应用程序执行后，出现了如图所示的错误信息，请问产生此错误的原因是(   )

下列字符串常量中，最大的是(   )。   

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

有如下VB程序段：

Private Sub Text1_Change()

  Dim c As Integer, i As Integer

  i=0

  c = Val(Text1.Text)

  Do While c >= 0

    c = c - i

    i = i + 1

  Loop

  Text1.Text = Str(c)

End Sub

在文本框输入“6”，执行该程序段后， 其中c >= 0执行的次数是（  ）

【加试题】某一条形码是由13位数字组成的编码，其末位是校验码。条形码校验的方法如下：①除校验码之外，求其余12位编码中的奇数、偶数的数字之和；②将偶数的数字之和乘以3，加上奇数的数字之和；③取第②步得到结果的个位数字，用10减去该数字，将得到的结果存入变量m；④若m的值为10，则将m的值修改为0，否则不变；⑤若m和校验码相等则输出“校验码正确！”，否则输出“校验码错误！”。

现编写一个VB程序，实现如下功能：在文本框Text1中产生条形码数字序列，单击“校验”按钮Command1，在标签Label1中输出对应的校验信息，界面如图所示。实现上述功能的VB程序如下，但加框处代码有错，请改正

Private Sub Command1_Click()

     Dim s As String, x As Integer

     Dim n As Integer , js As Integer, os As Integer, m As Integer

     Js=0: os=0

     s = Text1.Text

         

If n <> 13 Then

    Label1.Caption = "条形码位数错误!"

Else

    For i = 1 To 12

      

      If x Mod 2 <> 0 Then

        js = js + x

      Else

        os = os + x

      End If

    Next i

    m = os * 3 + js

       

    If m=Val(Mid(s,n,1)) Then

      Label1.Caption = "校验码正确!"

    Else

       Label1.Caption = "校验码错误!"

    End If

End If

End Sub

图a是一个“挖地雷”游戏的界面，9×9个格子里都有一个数字，红旗代表地雷可以用“-1”表示，图中共有10个地雷，“0”表示空白，所有数字的含义是以该数字格子为中心的3×3区域中地雷的个数。

小陈根据上述的描述设计了以下的程序，界面如图b所示，单击“初始化”按钮Command 1，按要求生成相关数据存储在数组a中并在列表框List 1中显示，该程序中最外圈不能有地雷，单击“计算”按钮Command 2，对数组a中的数据进行计算并在列表框List 2中输出，输出数据元素的宽度为固定值。

请回答问题：

某密码强度判断程序功能如下：在文本框Text1中输入由大写字母、小写字母、数字和其他字符4种不同类型字符组成的密码字符串，单击“判断”按钮Cmd1，在标签框Label3中显示判断结果。程序运行界面如图所示。

密码强度判断条件如下：密码长度小于6，则强度为“弱”。在密码长度大于等于6的情况下，若只出现一种字符，则密码强度为“弱”；若出现两种不同字符，则密码强度为“中”，出现3种以上不同字符，则密码强度为“强”。

对于语句abc. Caption=“你好”，下列理解正确的是（  ）

下列运算符中，优先级最低的运算符是（   ）

下列程序段执行后，x的值为（  ）

x=0

For i=1 To 3

  For j=1 To i

    For k=j To 3

      x=x+1

    Next k

  Next j

Next i

某VB应用程序的代码如下：

Function res（x As Integer，y As Integer，z As Integer）As Integer

  Dim temp As Integer

  If x>y Then temp=y Else temp=x

  If temp>z Then temp=z

  res=temp

End Function

Private Sub Command1_Click（）

  Dim a As Integer，b As Integer，c As Integer

  a=5：b=3：c=7

  Text1.Text=Str（res（a，b，c））

End Sub

程序运行时，单击命令按钮Command1后，在文本框Text1中显示的内容是（  ）

在某银行取款机上，用户银行卡密码验证的过程如下图所示：当用户输入密码时，若第1次输入错误，第2次输入才正确，则整个操作过程的执行流程是（ ）

下列运算符中优先级最高的是（     ）

语句x=input( )执行时，如果从键盘输入12并按回车键，则x的值是（    ）。

队列在Python中，用         实现队列的创建，队列的基本操作：         、         、         、         线性数据结构又称线性表。（    ）

以下VB 程序段执行后，输出的结果是（    ）。

m=1

n=2

if true then print m else print n

机器语言、汇编语言、高级语言三类计算机语言中，汇编语言使用符号编程，和具体的机器指令无关。

小王编写VB程序实现Excel筛选最大的n项数据功能。其功能如下：在列表框list1中显示m个原始数据(存储在数组a中)，在文本框Text1中输入整数n(n≤m)，单击“筛选”按钮Command1后，在列表框List2 中按降序输出最大的n项数据(包括第n项的重复数据)。

程序运行界面如图所示，实现上述功能的VB程序如下。请回答下列问题：

Const m= 10

Dim n As Integer

Dim a(1 To m) As Integer

Private Sub Form_ Load( )

    '获取原始数据依次存数组a中，并在列表框List1中显示，数据个数存变量m，代码略

End Sub

Private Sub Command1_ Click( )

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

    n= Val(Text1. Text)

    i= 1

    Do While i<=n

        k=i

        For j=i+1 To m

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

        Next j

        If i<>k Then

            a(i)=a(i)+a(k)： a(k)=a(i) - a(k) ：   ①  

        End If

        i=i+ 1

    Loop

    For i=1 To n

        List2. AddItem Str(a(i))

    Next i

    c==n

    For i=n+1 To m

        If  Then c=c+1： List2. AddItem

        Str(a(i))    '改错

    Next i

    List2. AddItem "筛选出" +   ②    + "个成绩"

End Sub

如下图片中体现了程序设计的哪种主要结构（    ）。