VB   发布时间:2022-04-03  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了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,请注明来意。