Algorithme qui déterminie le maximum et le minimum entre 03 nombres

Écrire un Algorithme qui le maximum et le minimum de 03 nombres.

Principe : L'on attribue au départ que parmie les 03 nombres entrés , le premier est le maximum et le minimum et si on decouvre que un nombre est superieure au max alors le max prends cette valeur , idem pour le minimum.

Exemple : Si j'entre 03 nombres tel que :nbre1= 4 ,nbre2 =8 ,nbr3= 10 , .Ainsi

le maximum est : 10
Le mimimum est : 4

Si j'entre 03 nombres tel que :nbre1= 4 ,nbre2 =4 ,nbr3= 4 .Ainsi

le maximum est : 4
Le mimimum est : 4

CORRECTION

Algorithme Max_Min;

var      nbre1,nbre2,nbr3,max,min: réel;
Début

        ecrire('Entrez vos trois nombre à tester ') ;
          lire(nbre1,nbre2,nbr3);
              max<-nbr1;

min<-nbr1;

si(max < nbr2)alors
max<-nbr1

sinon si (max < nbr3) alors

max<-nbr3;
fsi

si(min > nbr2)alors
min <-nbr1

sinon si (min > nbr3) alors

min <-nbr3;
fsi

ecrire(''Le maximum de nos trois nombres est : '', max , ''et le mimimum est :'' min);

Fin.