basic语言辗转相除法--高中数学3-45页练习1

2020年2月29日 17:35 by wst

高中数学编程

---

对于本章内容来说，只看不练，还是写不出来程序。

辗转相除法的原理我们已经掌握，但是怎么写出来能运行的程序呢？

' Gambas module file

Public Sub Main()
  Dim m, n, r As Integer
  Input m, n
  Do 
    r = m Mod n
    m = n 
    n = r
  Loop Until r == 0
    Print m
    Print "Hello world"
End

输入内容要求m大于n。

 如有问题，欢迎留言！

---