Inverser chaque 2nd element de liste

Bonjour,

Je débute en Prolog et j'aurais besoin d'aide s'il vous plait, comment faire pour inverser chaque pair dans une liste, ce que je veux dire c'est de cette façon
inversepair([1,2,3,4,5],[2,1,4,3,5]).

J'ai une inversion ici mais comment faire pour une pair?

Code:

---

1 2	accuInv([H|T],A,R) :- accuInv(T,[H|A],R). accuInv([],A,A).

---

Merci d'avance

On prend deux éléments |A,B|T] !

Merci beaucoup!

J'ai fait comme conseillé ça marche en modifiant

Code:

---

1 2	accuInv([H,H1|T],A,R) :- accuInv(T,[H,H1|A],R). accuInv([],A,A).

---

avec accuInv([1,2,3,4],[],X). cela marche impec, mais si je change sur accuInv([1,2,3,4,5],[],X). cela me retourne false, est-ce parce que il ne trouve pas de nombre pair? Comment faire pour lui éviter ce problème? Dois-je faire une lenght pour compter les pairs?

Merci d'avance

IL faut prevoir le cas où le nombre d'léments de la liste est impair.
Comment s'en rend-on compte ?

En vérifiant avec la liste? Si on a plus le Head mais que le tail alors il est impair?

Code:

---

paire([_|T]) :- impaire([T]).

---

Non, il faut considérer la clause accuInv([X], .....

Bonjour

merci de votre réponse, je pense être un peu perdu, j'ai essayé de considérer la clause en me disant si il ne reste qu'un dernier élément comparé à l'accumulateur
alors je le passe dans l'accumulateur sans m'occuper de la pair mais je ne sais pas ou est mon erreur?

Code:

---

1 2 3

accuInv([x],[h|t],r):= accuInv(t,[h|x],r). accuInv([H,H1|T],A,R) :- accuInv(T,[H,H1|A],R). accuInv([],A,A).

---

Code:

---

accuInv([x],[h|t],r):= accuInv(t,[h|x],r).

---

Ça marcherait déjà beaucoup mieux avec des majuscules ! :mouarf:
Ensuite j'écrirais : accuInv([X], T, [X | T]). simplement.

Merci beaucoup!

Oui effectivement mais je ne comprends pas chez moi quand je mets des majuscules j'ai des problèmes de Singleton?

Si jamais on veut garder le 5 pour la fin au lieu de l'inverser comment pourrait t'on procéder? si j'inverse 1 2 3 4 5 j'aurais 5 2 1 4 3,

J'ai essayé comme ceci accuInv([X], T, [T,X]). mais il me recrée un autre tableau du genre [[3, 4, 1, 2], 5] désolé d'abuser de votre patience:oops:

Code:

---

accuInv([x],[h|t],r):= accuInv(t,[h|x],r).

---

Ben oui, je n'avais pas vu c'est :- pas := :mouarf:
Maintenant, quel résultat voulez-vous exactement pour [1,2,3,4] et [1,2,3,4,5]

Roh punaise quel débile.... désolé de cette erreur de misérable j'ai toujours l'habitude du "=" dans les lang de prog:aie:

Eh bien si j'ai 1 2 3 4 5 j'aimerais avoir 2 1 4 3 5

C'est bien ce que je pensais, il faut donc utiliser reverse/2 dans les cas terminaux.
Il y a une méthode plus simple sans accumulateur.

Je suis désolé Trap D, je ne comprends vraiment pas... Reverse/2? j'ai fais quelques recherches et ils utilisent un accumulateur pour reverse/2 :(

reverse est un prédicat prolog qui inverse les éléments d'une liste : reverse([a,b,c], L) ==> L = [c, b, a].
Il faut l'utiliser si tu utilises un accumulateur pour réaliser ton exo.

Merci beaucoup de votre réponse Trap D je vais voir ça