大佬教程收集整理的这篇文章主要介绍了vb.net 教程 1-20 例 2 最大公约数和最小公倍数,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
求两个数的最大公约数和最小公倍数:
Sub main() Dim m As Integer Dim n As Integer Console.WriteLine("输入第1个整数:") m = Integer.Parse(Console.ReadLine()) Console.WriteLine("输入第2个整数:") n = Integer.Parse(Console.ReadLine()) Dim chengji As Integer = m * n Dim t As Integer If m < n Then t = m m = n n = t End If Dim yushu As Integer yushu = m Mod n Do While yushu <> 0 m = n n = yushu yushu = m Mod n Loop Console.WriteLine("这两个数的最大公约数是:" & n) Console.WriteLine("这两个数的最小公倍数是:" & chengji / n) Console.ReadKey() End Sub
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看vb.net 教程 目录
以上是大佬教程为你收集整理的vb.net 教程 1-20 例 2 最大公约数和最小公倍数全部内容,希望文章能够帮你解决vb.net 教程 1-20 例 2 最大公约数和最小公倍数所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。