请用VB程序编程求两个正整数m和n的最大公约数和最小公倍数.
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/06 04:05:36
请用VB程序编程求两个正整数m和n的最大公约数和最小公倍数.
如上标题,用VB程序实现
如上标题,用VB程序实现
Dim m As Integer,n As Integer
Private Sub Command1_Click()
m = Val(InputBox("输入正整数"))
n = Val(InputBox("输入正整数"))
If n * m = 0 Then
MsgBox "两数任何一个数都不能为0!"
Exit Sub
End If
End Sub
Private Sub Command2_Click()
Dim r As Integer,s As Integer
r = m:s = 1
Do Until m Mod r = 0 And n Mod r = 0 '最大公约数
r = r - 1
Loop
Do Until s Mod m = 0 And s Mod n = 0 '最小公倍数
s = s + 1
Loop
Text1.Text = "最大公约数是:" & r & "最小公倍数是:" & s
End Su
Private Sub Command1_Click()
m = Val(InputBox("输入正整数"))
n = Val(InputBox("输入正整数"))
If n * m = 0 Then
MsgBox "两数任何一个数都不能为0!"
Exit Sub
End If
End Sub
Private Sub Command2_Click()
Dim r As Integer,s As Integer
r = m:s = 1
Do Until m Mod r = 0 And n Mod r = 0 '最大公约数
r = r - 1
Loop
Do Until s Mod m = 0 And s Mod n = 0 '最小公倍数
s = s + 1
Loop
Text1.Text = "最大公约数是:" & r & "最小公倍数是:" & s
End Su
请用VB程序编程求两个正整数m和n的最大公约数和最小公倍数.
求两个m.n的最大公约数和最小公倍数 m*n\最大公约数=最小公倍数 c语言编程
用辗转相除法求两个自然数m,n的最大公约数和最小公倍数的vb程序编写
编写一个vb程序,输入两个正整数,求他们的最大公约数和最小公倍数,谢谢!
JAVA编程 输入两个正整数m和n,输出它们的最小公倍数和最大公约数
输入两个正整数m和n,求其最大公约数和最小公倍数.用C语言编程
输入两个正整数m和n,求其最大公约数和最小公倍数.用C++语言编程
求c语言程序.输入两个正整数m和n,求其最大公约数和最小公倍数.
c语言编程求两个正整数的最大公约数和最小公倍数!
编程C语言:输入两个正整数m,n,计算它们的最大公约数和最小公倍数
vb用辗转相除法求两个自然数m,n的最大公约数和最小公倍数的程序代码如下,请完善之
编写程序,输入两个正整数m和n,输出它们的最小公倍数和最大公约数