Kashub's Code Barn - "Silnia w prologu (sic!)"

%trace
 
domains
 i=integer
 
predicates
 silnia(i,i)
 
clauses
 silnia(X,N) :- N>1,N1=N-1,silnia(X1,N1),X=N*X1.
 silnia(1,1).

| Sklep z bronią | | Doradztwo inwestycyjne | | Produkty kredytowe dla firm | | Fotografia Sklep | | Programista Gdynia | | Darmowe Ebooki | | Opisy do komunikatorów | | Sztandary łowieckie | | Sztandary straży pożarnej | | Haft artystyczny ręczny |