Zadanie 1

Napisz predykat sprawdzający czy dwa pierwsze elementy listy są takie same.

? – takie_same([a,a,b]).

yes

? – takie_same([a,c,b]).

no

? – takie_same([a,X,b]).

X=a;

* bez rekursji

Zadanie 2

Napisz predykat zamieniający w liście element trzeci i czwarty np.

? – zmien([a,b,c,d], Nowa).

Nowa=[a,b,d,c];

* bez rekursji

Zadanie 3

Zdefiniuj predykat, który zlicza ile razy w liście występuje podany element. Przykładowe działanie.

? – zlicz_wystepowanie(a,[a,g,a,s,b,c,a,a],Ile).

Ile=4;

Zadanie 4

Jakie jest działanie poniższej reguły?

co_to(X, [X|Tail],Tail).

co_to(X, [Y|Tail], [Y|Tail1]):- co_to(X,Tail,Tail1).

Zadanie 5

Napisz regułę obliczającą dowolny wyraz ciągu Fibbonaciego:

Zadanie 6

Stwórz regułę obliczającą silnię danej liczby.