fonction nb_chiffres_dans_une_base(E n:entier, E base: entier): entier
{
        variable i : entier
                 q : entier

        i <-- 0
        q <-- n
        repeter
        {
                q <-- q div base
                i <-- i + 1
        } jusqu'à (q = 0)

        retourne i
}