Anonymous user
Greatest common divisor: Difference between revisions
Added BBC BASIC
(Added BBC BASIC) |
|||
Line 154:
gcd = gcd(a, b mod a)
end function</lang>
=={{header|BBC BASIC}}==
<lang bbcbasic> DEF FN_GCD_Iterative_Euclid(A%, B%)
LOCAL C%
WHILE B%
C% = A%
A% = B%
B% = C% MOD B%
ENDWHILE
= ABS(A%)</lang>
=={{header|Bc}}==
|