Tester l'algorithme :
Code de l'algorithme :
VARIABLES
n EST_DU_TYPE NOMBRE
t EST_DU_TYPE NOMBRE
b EST_DU_TYPE NOMBRE
b2 EST_DU_TYPE NOMBRE
s EST_DU_TYPE NOMBRE
DEBUT_ALGORITHME
LIRE n
LIRE b
b2 PREND_LA_VALEUR b*b
t PREND_LA_VALEUR 1
TANT_QUE (t <= n ) FAIRE
DEBUT_TANT_QUE
t PREND_LA_VALEUR t*b2
FIN_TANT_QUE
s PREND_LA_VALEUR 0
TANT_QUE (t != 1) FAIRE
DEBUT_TANT_QUE
t PREND_LA_VALEUR t / b2
s PREND_LA_VALEUR s/b + t
TANT_QUE (n >= s ) FAIRE
DEBUT_TANT_QUE
n PREND_LA_VALEUR n - s
s PREND_LA_VALEUR s + 2*t
FIN_TANT_QUE
s PREND_LA_VALEUR s - t
FIN_TANT_QUE
s PREND_LA_VALEUR s/2
AFFICHER "Resultat : "
AFFICHER s
FIN_ALGORITHME