Programme pour afficher max et min de 5 nbr

Fermé
med - 2 mai 2008 à 19:18
 hamza_bba - 2 mai 2008 à 19:24
Bonjour,

svp je veut faire un programme en pascal qui affiche le maximum et le minimum de cinq nombres a,b,c,d et e,

vous m'aidez svp même avec un algorithme seulement,

merci bcp
A voir également:

2 réponses

laurie071298 Messages postés 205 Date d'inscription lundi 28 mai 2007 Statut Membre Dernière intervention 5 octobre 2011 49
2 mai 2008 à 19:23
le plus facile (mais pas le plus efficace) est de parcourir deux fois la liste :
* tu cherche le min: une variable min
min = a
si b < min; min = b
si c <min; min = c ...
* puis tu cherche le max de la meme manière
0
le voila

program monprogram;

var min,a,b,c,d,e;

begin

a:=12;
b:=6;
c:=46
d:=56;
e:=3;

min:=a;

if b<min then min:=b;
if c<min then min:=c;
if d<min then min:=d;
if e<min then min:=e;

write('le min est ',min);

end;
0