ALGO

Fermé
LILA - 9 févr. 2009 à 18:59
oh9007 Messages postés 41 Date d'inscription mardi 10 février 2009 Statut Membre Dernière intervention 15 septembre 2010 - 10 févr. 2009 à 09:47
Bonjour,c lila
donnée un algorithme qui permet de trié dans l'ordre croissant les élément d'un vecteur de 30entier.

2 réponses

d@v Messages postés 6 Date d'inscription lundi 22 décembre 2008 Statut Membre Dernière intervention 20 mars 2009
9 févr. 2009 à 19:17
const N=30

procedue trier(tab[N] entier)
debut
var i :entier
temp:entier
for i:=1 to N-1 do
for j:=2 to N do
if tab[i]>tab[j] then
temp:=tab[i]
tab[i]:=tab[j]
tab[j]:=temp
finif
ffor
ffor
fproc
0
oh9007 Messages postés 41 Date d'inscription mardi 10 février 2009 Statut Membre Dernière intervention 15 septembre 2010 3
10 févr. 2009 à 09:47
algorithmme tri;
var t:tableau [1..100]d'entier;
x,i,j,n:entier;
debut
lire(n);{la taille de tab}
pour i:=1 à n-1 fair
pour j:=i+1 à n fair
si t[i]>t[j] alors
x:=t[i];
t[i]:=t[j];
t[j]:=x;
fair;
pour i:=1 à n fair
ecrir(t[i]);
0