Übungen Teil 2

Aufgabe 3 / Lösungsvorschlag

Lösung A

mal_zwei([ ],[ ]).

mal_zwei([K|R],[K1|R1]):-
K1 is K * 2,
mal_zwei(R,R1).

Lösung B

mal_drei([],[ ]).

mal_drei([K|R],[K1|R1]):-
K1 is K * 3,
mal_drei(R,R1).