注册

题型：单选题题类：难易度：容易

福建省仙游县第二中学2022-2023学年高一下学期信息技术期中质量检测试卷

在Python语言中，已知a=7，b=9，下列运行结果为True的是（）

A、not a!=b B、a==b C、a>=b+1 D、a<=b

举一反三

完成程序，使其具有下列功能：求表达式1－2＋3－4＋…＋n的值，在文本框Text1中输入一个正整数，单击“计算”按钮Command1，在标签Label3中输出计算结果。程序界面如下图所示：

程序代码如下：
Private Sub Command1_Click()
Dim n As Integer
Dim s As Integer
n =      ①
j = 1
For i = 1 To n
    s = s + i * j
    j =   ②
Next i
Label3.Caption =     ③
End Sub

VB中，能够正确表示代数式 $\text{[math]}$ 的是 ( )

【加试题】一个二进制数字串的压缩算法是取二进制字符串的首字符为压缩后的第一个符号，接着统计首字符的个数，二者连接后再连接一个分隔符“/”，接着是另一个连续字符的个数，再是分隔符“/”，……以此类推，直到结束。小明编写了一个VB程序实现上述算法，在文本框Text1中输入一串二进制数字，单击“压缩”按钮Command1，在文本框Text2中输入连续1和0的个数。程序运行界面如图所示。

实现上述功能的VB程序如下，但加框处代码有错，请改正。

Private Sub Command1_Click()

Text2．Text=coding(Text1．Text)

End Sub

Private Function coding(s As String)As String

Dim n As Integer，i As Integer，C As String

c=Mid(s，1，1)

n=1

For i=2 To Len(s)

If Then ‘(1)

n=n+1

Else

c=c+Str(n)+“／”

n=1

End If

Next i

coding= ‘(2)

End Function

有如下Visual Basic语句，书写格式正确的是（）

有如下 Visual Basic 程序段：

s = 0

For i = 1 To 20 Step 2

If s < 15 Then

s = s + i

End If

Next i

以上程序执行结束后，变量s和i的值分别为（）

编写VB程序，实现如下功能:在文本框Text1中输入一个整数，单击“查找”按钮，找出该整数的全部的连续整数固定和，并将它们显示在列表框List1中。所谓一个数n的连续整数固定和，就是指存在a₁ ， a₂ ， …， a_n ，其中a_i+1比a_i大1，使得a₁+a₂+…+a_n。这样a₁ ， a₂ ， …，a_n称为n的一个连续整数固定和。例如27的全部的连续整数固定和有3组，运行界面如图所示，实现上述功能的程序如下，请在划线处填写合适代码。

Private Sub Command1_Click()

Dim i As Integer, j As Integer, sum As Integer

Dim n As Integer, k As Integer, tmp As String

n = Val (Text1.Text)

sum = 0:List1.Clear

For i = 1 To n-1

j=i

Do While sum < n

{#blank#}1{#/blank#}

j = j + 1

Loop

If sum = n Then

{#blank#}2{#/blank#}

For k=i+1 To j-1

tmp = tmp + “+” + Str(k)

Next k

List1.AddItem tmp +“=”+ Str(n)

End If

{#blank#}3{#/blank#}

Next i

End Sub

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

周一至周五 8:30-17:30

在线咨询客服