{
    R : Permet d'ajouter une valeur à un tableau, dans l'ordre croissant
    E/S : tab 1 tableau de réels
    S : Vide
}
Saisie_ordonnee : une fonction (tab : un tableau de réels) -> vide
Lexique {Local à Saisie_ordonnee}
    nombre : un réel
Algorithme {Local à Saisie_ordonnee}
    Début
        Ecrire("Saisir un réel")
        lire(nombre)
        tab[0] <- nombre

        Ecrire("Saisir un réel")
        lire(nombre)
        Si nombre < tab[0]:
            Faire tab[1] <- tab[0]
                  tab[0] <- nombre
            Sinon tab[1] <- nombre
        
        Ecrire("Saisir un réel")
        lire(nombre)
        Si nombre > tab[1]:
            Faire tab[2] <- nombre
            Sinon
                tab[2] <- tab[1]
                Si nombre > tab[0]:
                    tab[1] <- nombre
                Sinon 
                    tab[1] <- tab[0]
                    tab[0] <- nombre

Lexique {Principal}
    tab : un tableau de 3 réel
    i : un entier
Algorithme {Principal}
    Début
        Saisie_ordonnee(tab)

        Faire tant que n < 2
            Ecrire(tab[i])
            i <- i + 1
    Fin