Mathematica
Mathematica
Datos personales
apache Flex
viernes, 11 de mayo de 2012
PROLOG: Ordena lista de numeros, metodo de la burbuja
10:26 | 
Publicado por
a8a
Este programa ordena una lista numérica en forma ascendente. Si quieres ordenar en forma descendente cambia la linea "B < A" por "A < B":
my_bubble_sort(Xs, Ys):-
my_append(Cs, [A,B|Ds], Xs),
B < A,
my_append(Cs, [B,A|Ds], Fs),
my_bubble_sort(Fs, Ys),
!.
my_bubble_sort(Xs, Xs).
Para ejecutar el programa:
?- my_bubble_sort([4,7,1,3,2,9,2,6], Ls).
Y el resultado es:
Ls = [1,2,2,3,4,6,7,9]
Nota: Este programa usa algunas reglas (programas) definidas anteriormente.
Suscribirse a:
Entradas (Atom)
Wolfram Programming Lab
