- 二一组卷

题型：单选题题类：常考题难易度：普通

浙江省“七彩阳光”新高考研究联盟2021届高三上学期信息技术返校联考试卷

有如下 VB 程序段：

a(0) = 0 i = 1

Do While i <= 6

a(i) = Int(Rnd * 5) * 2 + 1

If Not flag(a(i)) Or a(i) > a(i - 1) Then

flag(a(i)) = True

i = i + 1

End If

Loop

已知数组flag各元素的初值为False，该程序段运行后，数组元素a(1)到a(6)的值可能为 ( )

A、5,1,7,4,9,3 B、7,5,9,5,3,1 C、1,5,9,3,5,9 D、3,5,9,7,7,1

举一反三

产生[a,b](a,b都是整数且a<b)范围内某一随机整数的VB表达式是（）

小王基于选择排序算法编写了一个 VB 程序，功能如下：数组 a 有 n * n 个元素，按 n 行 n 列进行排列，按列进行升序排序。例如 6 * 6 的数组，第一列将 a(1)，a(7),a(13),a(19),a(25) ,a(31)进行排序。运行程序，在列表框 List1 中显示 n * n 个数列单击“排序”按钮 Command1，在列表框List2 中显示排序后的结果，程序运行界面如图所示。

请回答下列问题：

利用格里高利公式 $\text{[math]}$ 求π，直到最后一项的值小于0.0001为止，输出π的值。

Private Sub Command1_Click()

Dim Pi As Single, t As Single

Dim n As Integer, s As Integer

Pi = 0

t = 1: n = 1: s =1

Do While Abs(t) >= 0.0001

Pi = Pi + t

n ={#blank#}1{#/blank#}

s= {#blank#}2{#/blank#}

t = s / n

Loop

Text2.Text ={#blank#}3{#/blank#}

End Sub

下列 python表达式结果最小的是( )

有如下程序段:

s=input("请输入字符串:")

count=0

for i in s:

if i>="0" and i<="9" :

count+=1

print(s[count:count+3])

若输入的字符串为"AB12CCC222GGBD",则程序运行的结果为（）

运行以下Python程序段，若输入5，运行结果是（）。

x＝int（input（"请输入一个正整数"））

if x%2＝＝0：

print（x＋1）

else：

print（x－1）

相关试卷

公司介绍

服务介绍

帮助中心