6 lines
136 B
Text
6 lines
136 B
Text
function gcd(a%, b%)
|
|
if a = 0 gcd = b
|
|
if b = 0 gcd = a
|
|
if a > b gcd = gcd(b, a mod b)
|
|
gcd = gcd(a, b mod a)
|
|
end function
|