Lösungen zu Kapitel 3
Übung 1 fib :: Integer -> Integer

fib n |n==1 = 1
      |n==2 = 1
      |otherwise = fib(n-1) + fib(n-2)

 
Übung 2 kgV :: Integer -> Integer -> Integer
kgV a b = a*b `div` (ggT a b)
Download:
Kapitel03L.hs
weiter zu 4. Mehr über Funktionen (demnächst ??)

(C) 2005 www.pohlig.de