Prolog - máximo comun divisor

 
Vista:

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
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:máximo comun divisor

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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:máximo comun divisor

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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

RE:máximo comun divisor

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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

máximo comun divisor

Publicado por diana rodriguez (1 intervención) el 02/06/2013 22:46:49
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar