Prolog - máximo comun divisor

máximo comun divisor

Publicado por Silvia (1 intervención) el 24/10/2008 18:49:50

Alguien sabe cómo calcular el máximo comun divisor en Prolog?

Valora esta pregunta

Responder

Publicado por Vasco (1 intervención) el 13/11/2008 17:37:47

mcd(X,X,X).
mcd(X,Y,M):- X < Y, Y1 is Y – X, mcd(X,Y1,M).
mcd(X,Y,M):- X > Y, mcd(Y,X,M).

Valora esta respuesta

Comentar

Publicado por annier perez ricardo (1 intervención) el 17/03/2009 03:45:12

mcd(x,0,mcd).
mcd(x,y,mcd):-
y>0,
r is x mod y,
mcd(y,r,mcd)

Valora esta respuesta

Comentar

Publicado por Enrique CAnto (1 intervención) el 17/11/2009 16:32:07

Podria explicarme como es la ejecucion de este programa?

Valora esta respuesta

Comentar

Publicado por diana rodriguez (1 intervención) el 02/06/2013 22:46:49

predicates

nondeterm  mcd (integer, integer, integer)

clauses

 mcd(A,B,MCD):-

 A=B,

 MCD=A.

mcd(A,B,MCD):-

 A>B,

 C=A-B,

 mcd(C,B,MCD),!.

mcd(A,B,MCD):-

 C=B-A,

 mcd(A,C,MCD),!.

goal

mcd(2,4,MCD).

Valora esta respuesta

Comentar

Simular Sistema de Archivo en Prolog

pilas y colas