Tri d'un fichier
soussou
-
nawresssa -
nawresssa -
Bonjour,
svp
envoyé moi rapidement des exercices corrigés sur les fichiers (tri d'un fichier de type file of dans l'ordre alphabétique)
svp
envoyé moi rapidement des exercices corrigés sur les fichiers (tri d'un fichier de type file of dans l'ordre alphabétique)
Configuration: Windows XP Internet Explorer 6.0
2 réponses
-
bonjour sousou tu es en 4 eme science info?
voila un fichier qui est trié sur le code
PROCEDURE trI(var f: fichier);
var r1, r2: carte;
i, j: integer;
begin
reset(f);
for i:=0 to filesize(f)-2 do
begin
seek(f,i);
read(f,r1);
for j:=i+1 to filesize(f)-1 do
begin
seek(f,j);
read(f,r2);
if r1.code>(r2.CODE) then
begin
{Permutation}
seek(f,i);
write(f,r2);
seek(f,j) ;
write(f,r1);
r1:=r2;
end;
end;
end;
end;
et bonne chance pour les examens -
bonjour s'il vous plait vous pouvez m'envoyer rapidement tout les tries des fichiers et merci