sábado, 14 de junio de 2014

Ejercicio 2.3 dos y tres

2. El siguiente programa dice que dos personas son parientes si,  

(a). uno es predecesor del otro, ó   
(b). ambos tienen un predecesor común, ó   
(c). ambos tienen un sucesor común :      
parientes( X, Y) :- predecesor( X, Y).      
parientes( X, Y) :- predecesor( Y, X).      
parientes( X, Y) :- predecesor( Z, X), predecesor( Z, Y).      
parientes( X, Y) :- predecesor( X, Z), predecesor( Y, Z).  

¿ puede usted acortar el programa usando la notación de ';' ?  





3. Reescriba el siguiente programa sin utilizar la notación de ';' :  

traducir( Numero, Palabra) :-  

Numero = 1, Palabra = uno; 

Numero = 2, Palabra = dos;

Numero = 3, Palabra = tres. 





No hay comentarios:

Publicar un comentario