更多"下面是求最大公约数的函数的首部： Function gcd(ByVa"的相关试题:
[单项选择]下面是求最大公约数的函数的首部：
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))
[单项选择]有如下函数过程：
Function HFC(ByVal x AS Integer，ByVal y As Integer)As Integer
Do While y ＜ ＞ 0
sic=x/y
X=y
y=sic
Loop
HFC=x
End Function
以下是该函数的调用过程，该程序的运行结果是( )。
Private Sub Command1 _ Click( )
Dim a AS Integer
Dim b As Integer
a=12
b=2
x=HFC(a，b)
Print x
End Sub
A. 0
B. 6
C. 2
D. 80
[单项选择]有以下函数过程：
Function Gys(ByVal x As Integer，ByVal y As Integer)As Integer
Do While y＜ >0
Remender=x Mod v
x=y
Y=Reminder
Loop
Gys=x
End Function
以下是调用该函数的事件过程，该程序的运行结果是
Private Sub Command1_Click( )
Dim a As Integer
Dim b As Integer
a=50
b=10
x=Cys(a，b)
Print x
End sub
A. 0
B. 10
C. 50
D. 100
[单项选择]有如下函数过程：
Function Fun(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y＜＞0
reminder=x Mod y
x=y
y=reminder
Loop
Fun=x
End Function
以下调用函数的事件过程，该程序的运行结果是( )。
Private Sub Command7_Click（ ）
Dim a As Integer,b As Integer
a=100:b=25
x=Fun(a,B)
Print X
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下函数过程：
Function fun1(ByVal x As Integer,ByVal y As Integer) As Integer
Do While y＜＞0
reminder=x Mod y
x=y
y=reminder
Loop
fun1=x
End Function
在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。
Private Sub Command1_Click（ ）
Dim a AS Integer
Dim b As Integer
a=100
b=25
x=fun1(a,b)
Print x
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有下列函数过程：
Function fun1(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y＜＞0
reminder=x Mod y
x=y
y=reminder
Loop
fun1=x
End Function
在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。
Private Sub Command1_Click（ ）
Dim a As Integer
Dim b As Integer
a=100
b=25
x=fun1(a,b)
Print x
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下事件过程： Function UNC (ByVal x As Integer，ByVal y As Integer) As Integer Do While y＜＞0 sic=x/y x=y y=sic Loop UNC=x End Function 以下是该函数的调用过程，该程序的运行结果是 PriVate Sub COmmand1_Click（ ） Dim a As Integer Dim b As Integer a=12 b=2 x=UNC (a，b) Print x End Sub
A. 0
B. 6
C. 2
D. 80
[单项选择]阅读程序：
Function fac(ByVal n As Integer)As Integer
Dim temp As Integer
temp=1
For i%=1 To n
temp=temp*i%
Next i%
fac=temp
End Function
Private Sub Form_Click（ ）
Dim nsum As Integer
nsum=1
For i%=2 To 4
nsum=nsum+fac(i%)
Next i%
Print nsum
End Sub
程序运行后，单击窗体，输出结果是( )。
A. 35
B. 31
C. 33
D. 37
[填空题]下列给定程序中函数fun的功能是：求两个非零正整数的最大公约数，并作为函数值返回。
例如，若num1和num2分别为49和21，则输出的最大公约数为7；若num1和num2分别为27和81，则输出的最大公约数为27。
请改正程序中的错误，使它能得出正确结果。
注意：不要改动main函数，不得增行或删行，也不得更改程序的结构!
试题程序：
#include＜stdio.h＞
int fun(int a，int b)
int r，t：
if(a＜b)
/*********found*********/
t=a；b=a；a=t；
r=a%b；
while(r!=0)
a=b；b=r；r=a%b；
/*********found*********/
return(a)；
void main（ ）
int num1，hum2，a；
printf("Input num1 num2：")；
scanf("%d%d"，&num1，&num2)；
printf("num1=%d num2=%d/n/n"，num1，num2)；
a=fun(num1，num2)：
printf("The maximun common divisor is%d/n/n"，a)；
[简答题]下列给定程序中，函数fun的功能是：求两个非零正整数的最大公约数，并作为函数值返回。
例如，若num1和num2分别为49和2l，则输出的最大公约数为7；若num1和num2分别为27和81，则输出的最大公约数为27。
请改正程序中的错误，使它能得出正确结果。
注意：不要改动main函数，不得增行或删行，也不得更改程序的结构!
试题程序：
#include＜stdio.h＞
int fun(int a,int b)
int r,t;
if(a＜b)
/********found********/
(t=a;b=a;a=t;)
r=a%b;
while(r!=0)
(a=b;b=r;r=a%b;)
/********found********/
return(a);
void main（ ）
int num1,num2,a;
printf(Input num1 num2:");
scanf("%d%d",&num1,&num2);
printf("num1=%d num2=%d/n/n",num1,num2);
a=fun(num1,num2);
printf("The maximun common divisor is%d/n/n",a);
[单项选择]有j个自然数a、b、c，a和b的最大公约数是2，b和c的最大公约数是4，a和c的最大公约数是6，a、b、c的最小公倍数是84．这三个数的和最小是( )．
A. 32
B. 37
C. 43
D. 46
E. (E) 不存在这样的三个自然数
[简答题]编写两个函数，分别求两个整数的最大公约数和最小公倍数，然后用主函数调用这两个函数并输出结果，两个整数由键盘输入。
[简答题]请编写函数fun，它的功能是：求任意两个正整数的最小公倍数和最大公约数，最小公倍数放在指针变量bei所指的变量中，最大公约数放在指针变量yue所指的变量中。
注意：部分源程序在文件PROG1.C中。请勿改动主函数main和其他函数中的任何内容，仅在函数fun的花括号中填入你编写的若干语句。
void fun(int m，int n，int*bei，int *yue)
{int s=l，i;
if(m＞n){s=m；m=n；n=S；}
for(i=2，s=1；i＜m i++)
if((m%i=0)&&(n%i=0))
{
}
*yue=s；
*bei=S*m*n；
}
main( )
{int a，b，beishu,yueshu；
chscr( )；
printf("please input a,b：")；scanf("%d，%d，"&a，&b)；
fun(a，b，&beishu,&yueshu)；
printf("a，b beishu：%d/n",beishu)；
printf("a，b yueshu：%d/n"，Yueshu)；
}
[填空题]
以下程序求一组整数的最大公约数。试完善程序以达到要求的功能。
#include
int gcd(int a,int b) i
{int r;
while(（）)
{r=a%b;a=b;(（）);}
return a;
}
void main（ ）
{int x,i,a[6]={12,56,48,32,16,24};
x= (（）) ;
for(i=1;i<6;i++)
x=gcd(（）,a[i]);
printf("(%d,",a[O]);
for(i=1;i<5;i++)
printf("%d,",a[i]);
printf("%d)=;d/n",a[5],x);
}
[单项选择]有如下函数：
Function fun(a As Integer,n As Integer) As Integer
Dim m As Integer
While a＞=n
a＝a-n
m＝m+1
Wend
fun=m
End Function
该函数的返回值是( )
A. a乘以n的乘积
B. a加n的和
C. a减n的差
D. a除以n的商(不含小数部分)
[填空题]
设有以下函数过程：
Function fun(m As Integer)As Integer
Dim k As Integer,sum As Integer
sum=0
For k=m To 1 Step -2
sum=sum+k
Next k
fun=sum
End Function
若在程序中用语句s=fim(10)调用此函数，则s的值为 【6】 。
[单项选择]有如下函数：
Function fun(a As Integer, n As Integer) As Integer
Dim m As Integer
While a＞=n
a=a-n
m=m+1
Wend
fun=m
End Function
该函数的返回值是
A. a乘以n的乘积
B. a加n的和
C. a减n的差
D. a除以n的商(不含小数部分)
