Discussion :

[reuqnas]

Bonjour,

je voulais savoir comment on peut supprimer deux éléments sur trois dans une liste en commançant par les deux premiers. ex : [2;-8;3;6;-2;2;3] renvoie [3;2].

merci de me répondre

j'ai commencé en faisant cela :

Code :

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

1
2
let rec supprime = function [] -> []
 		| (a::b::c::l) -> a::supprime l;;

merci de m'aider

[gasche]

Actuellement ton code "jette" `b` et `c` et garde `a`. Si tu veux supprimer les deux premiers, il faut au contraire garder `c` et jeter les deux premiers.

Par ailleurs tu ne gères pas le cas où ta liste a un nombre d'éléments qui n'est pas multiple de trois, hors c'est le cas dans ton exemple. Si tu veux gérer ton exemple, il faut rajouter des cas pour les listes ayant seulement un ou deux éléments.

Enfin, je dois dire que je me demande à quoi sert ta fonction. Si c'est un exercice je peux comprendre, mais je ne vois aucune situation réelle où cette fonction est utile (par contre je vois des cas où une mauvaise conception du programme conduit à stocker trois entiers côte à côte dans une liste alors qu'on devrait utiliser une liste de triplets d'entiers). À quoi te sert-elle ?

[reuqnas]

c'est un exercice on me dit de faire une fonction qui supprime deux éléments sur trois dans une liste en commençant par les deux premiers. j'ai des partiels la semaine prochaine la dessus et j'ai du mal en caml du coup j'ai trouver se partiel deja donnée et j'aimerai savoir comment le faire pour avoir quelque exemple.

[reuqnas]

c'est donc cela qu'il faut que je marque nan :

Code :

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

1
2
3
let rec suppr = function
	[]-> []
	|(a::b::c::l) -> C::suppr l;;

voila parce que cela marche

[reuqnas]

j'ai aussi une fonction entrelace qui entrelace deux listes de la maniere suivante :
entrelace [1;2;3;4;5] [6;7;8] doit renvoyer [1;6;2;7;3;8;4;5]

vous n'avez pas quelques conseils a me donner pour que je puisse la tester
merci de me repondre

Code :

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

1
2
let rec entrelace = function ([],[]) -> []
           |(a::l) ->

[gasche]

Merci de lire mes messages en entier : remplacer "a" par "c" est bien, mais il faut aussi gérer les deux cas de listes non-vide mais ayant moins de trois éléments.

Dans ta deuxième fonction, il faut que tu gères quatre 4 :

Code :

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

1
2
3
4
| ([], []) -> ..
| ([x], []) ->...
| ([], [y]) -> ...
| (x::xs, y::ys) -> ...

Je te laisse remplir les ... dans chaque cas.

[reuqnas]

Code :

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

1
2
3
4
([], []) -> []
| ([x], []) ->[x]
| ([], [y]) -> [y]
| (x::xs, y::ys) ->

[gasche]

Par exemple dans le cas ([1], [2]) (qui correspond au motif, puisque c'est la même chose que (1::[], 2::[])), tu veux renvoyer quoi ? Et pour ([1;2], [3;4]) ?

[Ubiquité]

c'est donc cela qu'il faut que je marque nan :

Code :

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

1
2
3
let rec suppr = function
	[]-> []
	|(a::b::c::l) -> C::suppr l;;

voila parce que cela marche

Si tu lis avec attention les warnings du toplevel ocaml tu vera qu'il y a un probléme.

[Cacophrene]

Bonsoir,

Comme cela a déjà été dit plus haut, il y a plusieurs cas de figure à considérer :

• Liste vide.
• Liste à un élément
• Liste à deux éléments
• Liste à plus de deux éléments.

Ta fonction suppr (avant le post sur la fonction entrelace) renverra une erreur dans les trois premiers cas. Compare ta fonction avec quelque chose comme ceci :

Code :

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

1
2
3
4
let rec supprime = function
  | _ :: _ :: z :: t -> z :: supprime t
  | _ -> []

Cordialement,
Cacophrène

[ceciestunpseudo]

c'est donc cela qu'il faut que je marque nan :

Code :

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

1
2
3
let rec suppr = function
	[]-> []
	|(a::b::c::l) -> C::suppr l;;

voila parce que cela marche

Pour le dire à ta façon : «*Nan... »
Et d'ailleurs ça ne « marche » pas.
Nul besoin de l'exécuter d'ailleurs pour le voir. Le compilateur/interpréteur différencie les minuscules des majuscules et C n'est pas défini ici.

[prgasp77]

Encore une fois je te retrouve avec un message insultant ... Tu n'apportes rien au problème et ne fait que critiquer bêtement. Continue et ce sera plus que mes foudres que tu t'attirera !

[ceciestunpseudo]

Encore une fois je te retrouve avec un message insultant ... Tu n'apportes rien au problème et ne fait que critiquer bêtement. Continue et ce sera plus que mes foudres que tu t'attirera !

Est-ce à moi que cela s'adresse ?

Si oui :
Il me semble que j'explique ce qui ne fonctionne pas non ?
Donc en quoi cela n'apporte rien au problème ?
Où sont les critiques ?
Et est-ce qu'on se connait ? Je ne m'en rappele pas.
Étrange comme message.

Si non : oupps pardon vu que le message suivait je pensais que c'était pour moi.

[Cacophrene]

Bonsoir,

J'espère que ce n'est pas suite à mon message, passé semble-t-il presque inaperçu, et qui ne contient rien d'insultant.

Cordialement,
Cacophrène