全国计算机等级考试二级VB程序设计模拟试题四【完善程序题】
中华IT学院 【
大 中 小】 [ 2017年1月19日 ]
完善程序题(每空1分,共10分)
1.求两个自然数m,n的最大公约数
Private Sub Form_Click()
Dim m%,n%,t%,r%
m=InputBox(“输入m”)
n= InputBox(“输入n”)
If m<n then
t=m:m=n:n=t
[ 1 ]
Do
r= [ 2 ]
If r=0 then [ 3 ]
m=n
[ 4 ]
Loop
Print “m和n的最大公约数是:”, [ 5 ]
End Sub
免责申明 --------------------------------------------------------------------------------------
以上内容仅代表原创者观点,其内容未经本站证实,中华考试网对以上内容的真实性、完整性不作任何保证或承诺,转载目的在于传递更多信息,由此产生的后果与中华考试网无关;如以上转载内容不慎侵犯了您的权益,请联系我们
,我们将会及时处理。