欢迎来到牛牛题库网牛牛题库官网

注册

未知题型

下面是求最大公约数的函数的首部：
Function gcd(ByVal X As Integer，ByVal y As Integer)As Integer
若要输出8、12、16这3个数的最大公约数，下面正确的语句是（）。
A.Print gcd(8，12)，gcd(12，16)，gcd(16，8)
B.Print gcd(8，12，16)
C.Print gcd(8)，gcd(12)，gcd(16)
D.Print gcd(8，gcd(12，16))

A.Print
B.Print
C.Print
D.Print

【参考答案】

D
D。【解析】GCD函数返回两个或多个整数的最大公约数，最大公约数是能分别将各个参数除尽的最大整数。其语法格戈......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)

点击查看答案

相关考题

未知题型

某人编写了下面的程序，希望能把Text1文本框中的内容写到out．txt文件中：
Private Sub Command1Click（）
Open"out．txt" For Output As#2
Print”Text1”
Close#2
End Sub
调试时发现没有达到目的，为实现上述目的，应做的修改是（）。
A.把Print”Text1¨改为Print#2，Text1
B.把Print”Text 1”改为Print Text1
C.把Print”Text1”改为Write”Text1”
D.把所有#2改为#1

未知题型

窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Corqmand1_Click（）
Dim a As Integer，b As Integer
a=8
b=12
Print Fun(a，b)；a；b
End Sub
Private Function Fun(ByVal a As Integer，b AS Integer)As Integer
a=a Mod 5
b=b＼5
Fun=a
End Function
程序运行时，单击命令按钮，则输出结果是（）。
A.3 3 2
B.3 8 2
C.8 8 12
D.3 8 12

未知题型

在窗体上画一个命令按钮，名称为Command1，然后编写下列代码：
Option Base 0
Private Sub Command1 Click（）
Dim A1(4)As Integer，A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox(”请输入一个整数”)
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为（）。

微信小程序免费搜题

All Rights Reserved 版权所有©牛牛题库网(nntiku.com)

备案号：湘ICP备2022003000号-1

关注
顶部

微信扫一扫,加关注免费搜题

微信扫一扫,加关注免费搜题