搜搜考试网用VB编写一个判断两个正整数的最大公因数的程序怎么写啊?
来源：学生作业帮 编辑：搜搜考试网作业帮 分类：综合作业 时间：2024/08/18 17:42:22
用VB编写一个判断两个正整数的最大公因数的程序怎么写啊?
Private Sub Command1_Click()
a = InputBox("请输入数值")
b = InputBox("请输入数值")
If Val(a) < Val(b) Then
For i = 1 To Val(a)
If Val(a) Mod i = 0 And Val(b) Mod i = 0 Then c = i
Next
Else
For i = 1 To Val(b)
If Val(a) Mod i = 0 And Val(b) Mod i = 0 Then c = i
Next
End If
Print c
End Su
a = InputBox("请输入数值")
b = InputBox("请输入数值")
If Val(a) < Val(b) Then
For i = 1 To Val(a)
If Val(a) Mod i = 0 And Val(b) Mod i = 0 Then c = i
Next
Else
For i = 1 To Val(b)
If Val(a) Mod i = 0 And Val(b) Mod i = 0 Then c = i
Next
End If
Print c
End Su
用VB编写一个判断两个正整数的最大公因数的程序怎么写啊?
用Vb编写一个程序,要求从键盘输入一个正整数M,自动判断并显示M中有哪些数可以分为两个相等的素数.
编写一个vb程序,输入两个正整数,求他们的最大公约数和最小公倍数,谢谢!
编写一个计算个人所得税的程序（用VB编写）
如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数
谁能给我写一个vb小程序,编写一个函数,求1-N（正整数）的所有正整数之和,
用vb编写一个用于求随机数的程序,
用VB程序编写 和数能表示1到23的5个正整数
求用vb编写下面的程序
用vb编写函数过程IsPrim(n),对于一个给定的正整数n,判断是否是素数
Vb编程,编写一个一元二次方程的求解程序,要求能够判断方程是否有根
vb例题：任意输入一个整数,编写程序判断该整数的奇偶数