进口车商检需要什么:VB编程从键盘上输入两个正整数M和N,求最大公约数

来源：百度文库编辑：神马品牌网时间：2024/05/13 05:43:37

谢谢
无输入语句啊 5555

Private Function gongyue(ByVal a As Long, ByVal b As Long) As Long
Dim lMin As Long, lMax As Long, lRs As Long
If a = b Then
gongyue = a
Exit Function
ElseIf a > b Then
lMax = a
lMin = b
Else
lMax = b
lMin = a
End If
lRs = lMax Mod lMin
Do While lRs > 0
lMax = lMin
lMin = lRs
lRs = lMax Mod lMin
Loop
gongyue = lMin
End Function

VB编程从键盘上输入两个正整数M和N,求最大公约数从键盘上输入两个正整数M和N,求最大公因子. VB 输入两个正整数m和n，求其最大公约数和最小公倍数。输入两个正整数m和n，求其最大公约数和最小公倍数输入两个正整数M和N,求其最大公约数和最小公倍数. 输入两个正整数m和n，求其最大公约数和最小公倍数输入两个正整数m和n，求它们的最大公约数和最小公倍数。(习题6.1) 1．输入两个正整数m和n,求其最大公约数和最小公倍数. 题目：输入两个正整数m和n，求其最大公约数和最小公倍数求,用(工程1-Microsoft Visual Basic)编一个程序,是(输入两个正整数m,n ,输出其最小公倍数)谢谢