Files
Construction-of-Compilers/Project-02-03-04/triplaprograms/ggT_euclid_rec.tripla
2026-01-16 13:50:04 +01:00

8 lines
184 B
Plaintext

let ggT(a, b) {
if (a == b) then
a
else if (a > b) then
ggT(a-b, b)
else
ggT(b-a, a)
} in ggT(3528, 3780) // result should be 252