Greatest common divisor: Difference between revisions
Content added Content deleted
m (→Iterative: Cleaned up extra stuff) |
(Added solution in J.) |
||
Line 27: | Line 27: | ||
: gcd ( a b -- n ) |
: gcd ( a b -- n ) |
||
begin dup while tuck mod repeat drop ; |
begin dup while tuck mod repeat drop ; |
||
=={{header|J}}== |
|||
x+.y |
|||
=={{header|Java}}== |
=={{header|Java}}== |