Ocena użytkownikóww: ***** / 5
Nadesłany przez Adam Chrapkowski, 04 grudnia 2013 23:53
Kod przedstawiony poniżej przedstawia główną część rozwiązania problemu.
Pobierz pełne rozwiązanie.euklides_nwd.hs:
-- Algorytm Euklidesa (najwiekszy wspolny dzielnik)
-- www.algorytm.org
my_gcd :: Int -> Int -> Int
my_gcd a b
| b == 0 = a
| otherwise = my_gcd b (a `mod` b)
