JacKrauser
Messages postés31Date d'inscriptionlundi 14 mai 2012StatutMembreDernière intervention21 août 2012
-
15 mai 2012 à 10:23
JacKrauser
Messages postés31Date d'inscriptionlundi 14 mai 2012StatutMembreDernière intervention21 août 2012
-
15 mai 2012 à 15:03
Bonjour,
je n'arrive pas à afficher la médiane d'une listbox.
Je m'explique :
pour ce faire, je compte le nombre d'éléments, ensuite je le divise par 2 et j'en fait un ROUND pour éviter un nombre à virgule.
Ensuite j'affiche l'élément de la liste situé à la position donnée par le résultat précédent.
Vous voyez quelque chose d'impossible dans le code ?
var
mediane : integer;
total : real;
//médiane
if (lbxListe.Items.Count>2) then
begin
total:=ROUND((lbxListe.Items.Count/2)*100)/100;
mediane:=compteur;
lbMediane.caption:=lbxListe.Items.Strings[mediane];
end
else
lbMediane.caption:='';
end;
var
mediane : integer;
Begin
//médiane
if (lbxListe.Items.Count>1) then
begin
mediane:=lbxListe.Items.Count div 2;
lbMediane.caption:=lbxListe.Items.Strings[mediane-1];
end
else
lbMediane.caption:='';
end;