Algorithme Comptage_Totalisation
{

        // Déconseillé par le prof !
        variable n : entier
                 s, nbn : entier

        s <-- 0
        nbn <-- 0
        
        n <-- 1
                
        Tant que ( n != 0)
        {
                Afficher("Veuillez entrer un nombre entier positif ou 0 pour arreter : ")
                Saisir(n)
                Si (n != 0) alors        
                {
                        s <-- s + n
                        nbn <-- nbn + 1
                }
        
        }
        
        Afficher("La somme des ", nbn, " entier(s) saisi(s) est :", s, ".\n")
}