Programowanie w systemie UNIX/Haskell: Różnice pomiędzy wersjami

m
→‎go: nowy przykłąd
m (→‎go: nowy przykłąd)
main = loop 1000000
</source>
 
 
 
<source lang=haskell>
-- https://gist.github.com/niorad/45187d9eb76c585e573e
divideBy x y = go x y 0
where go a b count
| a < b = (count, a)
| otherwise = go (a - b) b (count + 1)
</source>
 
Zmienna count jest pomocniczym licznikiem
 
==Listy==
6825

edycji