注册

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

浙江省诸暨市牌头中学2018-2019学年高二上学期信息技术期中考试试卷

下列VB 程序用于求2个正整数(均小于10000)的最大公约数:

Private Sub Command1_Click()

Dim x As Integer,y As Integer,z As Integer

x=Val(Text1.Text) ‘第1个正整数

y=Val(Text2.Text) ‘第2个正整数

‘调用函数gcd

Text3.Text=Str(z)

End Sub

Function gcd(a As Integer, b As Integer) As Integer

Do While a <> b

If a>b Then a=a-b Else b=b-a

Loop

gcd=b

End Function

方框中的正确语句是（）

A、z=gcd B、z=gcd(a, b) C、z=gcd(x, y) D、z=gcd x, y

举一反三

（加试题）有如下VB程序段：

A=1：b=1：n=12

f(1)=a：f(2)=b

For i=3 to n

c=a+b

f(i)=c Mod 4

a=b

b=c

Next i

执行该段程序后，数组元素f(12)的值为（）

运动会田径比赛，记分裁判把各赛道运动员的成绩表交给录入员录入到计算机中，录入人员编制了如下程序｡运行程序，按道次顺序依次输入8个成绩，道次号存放在数组a中，相应道次的运动员比赛成绩存放于数组b中，并将原始成绩显示在列表框List1 中｡单击“成绩排序”按钮(Command1)，将原始成绩从好到差排序，排序结果显示在列表框List2 中｡运行效果如图所示｡

实现上述功能的VB程序如下：

有如下程序段：

i = 1

Do While i<=6

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

If a(i) Mod 2 = i Mod 2 Then i = i + 1

Loop

For i = 1 To 2

k = 1

For j = 1 To 6 - i * 2

If a(j) * k > a(j + 2) * k Then

t = a(j): a(j) = a(j + 2): a(j + 2) = t

End If

k = -k

Next j

Next i

执行该程序段后，在下列选项中，a(1)~a(6)各元素值可能的是（）

求[0,100]之间所有偶数之和s的算法流程图如图所示。

为了实现此算法，图中判断框①和处理框②处可填入的是（）

关于Python中的函数，下列表述正确的是（）。

定义如下函数：

def tob(n)

if n=0:

return "*

else:

return tob(n//2)+str(1-n%2)

执行语句s=tob(10) 后，s的值为（）

返回首页

相关试卷

试题篮

公司介绍

Company Introduction

服务介绍

Service Introduction

帮助中心

Help center

二一教育APP

二一教育APP

400-637-9991

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

在线咨询客服