Discussion :

[mahdi34]

Salut

Je voulais ecrire un prédicat qui crée des mots à partir d’une liste de lettres
et qui utilisent toutes les lettres de la liste une seule fois.
comme dans l'exemple:
?- cree_mot([a,b,c],X).
X=bac

j'ai fait un prog qui affiche toute les possibilités de mots dans une ligne et moi je veux un seul mot à chaque fois .
est ce que vous pouvez m'aider a le corriger .

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
 
cree_mot(L,X):- permutation(L,X), aff_elements_de_liste(X) . 
 
aff_elements_de_liste([T|Q]) :- write(T) , write(' '),aff_elements_de_liste(Q).

merci d'avance .

[Trap D]

Je n'ai pas bien compris : tu veux un mot par ligne ou n'afficher qu'un seul mot ?
Si c'est un mot par ligne, il suffit d'ajouter nl après le write(T).

[mahdi34]

salut

Je veux un seul mot par ligne , mais la ça m'envoie toutes les possibilités collés et si je met nl apres write(T) ça m envoie une lettre par ligne .

cree_mot(L,X):- permutation(L,X), aff_elements_de_liste(X) .
aff_elements_de_liste([T|Q]) :- write(T) , write(' '), aff_elements_de_liste(Q) .
/* permutation est deja definie*/

ça donne

9 ?- cree_mot([a,b,c],X).
a b c a c b b a c b c a c a b c b a

et mot je veux le resultat :
X=abc
X=acb
.............

[Trap D]

Pour accoler les lettres pour former les mots deux solutions différentes ont été données sur une autre discussion sur ce forum.

[mahdi34]

Merci pour la reponse mais j'ai chercher et je n'est pas trouver cette discussion........est ce que vous pouvez m'aider une derniere fois .

[Trap D]

Je crois que tu exagères un peu, regarde les titres des discussions !