Lab 2 prolog - USM

Extras din document

. Să se definească predicatul expo(X,N,XlaN) de ridicare a unui număr la o putere naturală cu ajutorul recursiei. domains rezultat=real numar, exponent=integer predicates putere(numar,exponent,rezultat) clauses putere(N,_,R):-N=0,R=0. putere(N,E,R):-N<>0,E=0,R=1. putere(N,E,R):-N<>0,E>0,E1=E-1,putere(N,E1,R1),R=R1*N. Se verifica conditia : daca exponentul este diferit de 0 si numarul diferit de 0 o sa se indeplineasca conditia rezultatul devin R=R1*N. In cazul cind N este diferit de 0 si E este 0 atunci rezultatul devine deoarece,orice numar ridicat la puterea 0 devine 1. In cazul cind N este egal cu 0 atunci rezultatul devine 0 deoarece numarul 0 ridicat la orice putere este 0.