Ajouter des éléments pairs dans Prolog- Problème avec la variable 'amt'

Question

J'essaie de comprendre comment ajouter des éléments pairs dans une liste (j'ai étudié des exemples mais je ne peux pas le faire tout seul, j'ai besoin de votre aide pour épingler bas mon manque de compréhension à une zone spécifique).

L'entrée que j'ai utilisée est start ([1,2,3,4,5]). Il n'y a pas d'erreur de compilation, mais je n'ai pas de sortie. Je ne suis pas sûr de ce que l'erreur logique est.pourriez-vous s'il vous plaît aviser?

(s'il vous plaît voir ci-dessous pour la dernière mise à jour, après la révision de mon code, maintenant il fonctionne et le problème réside dans la façon dont je l'utilise « amt », mais je ne sais pas pourquoi!)

originale code qui n'a pas fonctionné:

start(X):- add(X,1,amt), write(amt). 

add([],_,0). 
add([H|Tail],Cnt,amt):- 
    T is (Cnt mod 2), T == 0, Cnt1 is Cnt + 1, add(Tail,Cnt1,Y), amt is H+Y; 

    T is (Cnt mod 2), T =\=0, Cnt1 is Cnt + 1, add(Tail, Cnt1, amt). 

Dernière mise à jour:

I remplacé 'amt' avec un 'S', et ça marche! Mais pourquoi wldnt travailler avec 'amt'?

est ici le code révisé qui fonctionne:

start(X):- add(X,1,S), write(S). 

add([],_,0). 
add([H|Tail],Cnt,S):- 
    T is (Cnt mod 2), T == 0, Cnt1 is Cnt + 1, add(Tail,Cnt1,Y), S is H+Y; 

    T is (Cnt mod 2), T =\=0, Cnt1 is Cnt + 1, add(Tail, Cnt1, S). 

Merci :)

Answer 1

Êtes-vous Acceptant d'afficher AMT1?