Algorithme : Lire un nombre fini de notes entre 0 et 20 et afficher la meilleure, la moins bonne, et la moyenne.

Début
    Variable note, min, max, nombre_notes, somme, moyenne : Entier
    max <- 0
    min <- 20
    nombre_notes <- 0
    somme <- 0
    Ecrire("Taper les notes une par une, finir par -1")
    Tant que note != -1:
        Lire(note)
        somme <- somme + note
        nombre_notes <- nombre_notes + 1
        Si note < min:
            min <- note
        FinSi
        Si note > max:
            max <- note
        FinSi
    FinTantQue
    moyenne <- somme / nombre_notes
    Ecrire("Meilleure note :", max)
    Ecrire("Moins bonne note :", min)
    Ecrire("Moyenne :", moyenne)
Fin