algorithme ex01;
variables a,b,c,d : entier
debut
ecrireln ('entrer les valeurs de a,b,c,d');
lire (a,b,c,d);
si (a>b) et (b>c) et (c>d)
ecrireln('les valeur minimonet sont', a, 'et',b,'et',c);
sinon
ecrireln('les valeur mininmontsont',b,'et', c,'et',d);
finsi ;
fin.[/CENTER][/LEFT]