bonsoir,
quelqu'un surait 'il m'expliquer ou alors me proposer un tuto sur des tri sur les listes simplement et doublement chainées SVP
merci

visiblement c'est plutot un cours d'algo qu'il te faut...
l'url :
http://www.mandragor.org/tutoriels/tris/0
decrit des algorithmes sur les tableaux, a toi de voir comment les adapter pour des listes.

Les deux tris les plus performants sont le tri rapide et le tri fusion.

Le tri fusion convient particulièrement bien pour les listes chainées.

c'est un peu tardif mais j'avai reussi mon tri par insertion comme suit
procedure tri(var p:pt);
var h,g,x : pt;
begin
h := p;
p := p^.suiv;
h^.suiv := nil;
while p <> nil do
begin
g := p;
p := p^.suiv;
if h^.nbr >= g^.nbr then
begin
g^.suiv := h;
h := g;
end
else
begin
x := h;
while (x^.suiv^.nbr < g^.nbr) and (x^.suiv<> nil)do
begin
x := x^.suiv;
end;
g^.suiv := x^.suiv;
x^.suiv := g;

end;
end;

p := h;
end;

là j'ai un probleme de sauvegarde. voici la procdure :
procedure save(var p : pt);
var chemin : string;
erreur : integer;
fichier : file of onion;
begin
writeln('vlez vous save ? (ok)');
readln(ch);
if ch ='ok' then
begin
writeln('o— sauvegarder ?');
readln(chemin);
chemin := chemin + 'on';
{$I-}
assign(fichier,chemin);
reset(fichier);
{$I+}
erreur := IOresult;
if erreur = 0 then
begin
while p <> nil do
begin
write(fichier,p^);
p := p^.suiv;
end;
close(fichier);
writeln('c un succes');
end;
end;
end;

quand je oompile il n'ya que le message demandant de saisir le repertoire et pas de saisie possible
qu faire ?

étonnant que ca compile vu que tu n'as pas déclaré ch, à moins que tu sois passé par une hideuse globale.

c'est vrai mais je pense c'est pas le plus grave svp il n'y a personne sur ce forum ?

salut
je pense qu'en rajoutant un readln; avant le message tout va bien:D: en tout cas dans l'esecution:roll:

merci de faire des topics séparé pour des problèmes différents...
ca simplifie la recherche sur le forum.

ok donc comme il n'est pas resolu je le met dans un autre topic