Lösungen

Programmiert man den größten gemeinsamen Teiler in Lisp so sieht das beispielsweise so aus:

In Common Lisp braucht das nicht eigens programmiert werden. Diese Funktion steht als Standart zur Verfügung.

    (defun gcd (a b)
 "Die Funktion gibt den groessten gemeinsamen 
 zweier Zahlen aus. So ist beispielsweise
 (gcd 12 18)->6"
 (let ((rest b))
     (while ( not (zerop rest)) 
            (setq rest (mod a b)  a b b rest)
            )
  a)
)

Lösungen:

1. (a) 168 (b) 13 (c) 147
2. --

3. Teilt man x³ - 3 mit Rest durch x - 3, so erhält man: x³ -1 = (x² +3x + 9) ^. (x - 3) + 24. Jeder gemeinsame Teiler von x³ - 3 und x - 3 muss also ein Teiler von 24 sein.