- Insertar un entero en una lista de enteros, ademas de indicarle la posición de la lista
Predicados
insertar(E,[X|Xs],1,L):- L=[E,X|Xs],nl,!.
insertar(E,[X|Xs],P,L):- N1=P-1,write(N1),nl,insertar(E,Xs,N1,L1),L=[X|L1].
Ejecutar
insertar(2,[1,3,4,5,6],6,L).
Comentarios
Publicar un comentario