FAITE MOI CETTE EXO
anais
-
PIx Wilz Messages postés 667 Statut Membre -
PIx Wilz Messages postés 667 Statut Membre -
Bonjour,
donner l'algorithme de conversion d'une base b1 vers une base b2.
(on pourra utiliser la base 10 comme une base intermédiaire)
donner l'algorithme de conversion d'une base b1 vers une base b2.
(on pourra utiliser la base 10 comme une base intermédiaire)
1 réponse
-
{Transforme le nombre en base 10}
0) Fonction Base10(N :chaine, b1 :entier) :entier
1) b10 <-- 0
Pour i de 1 à long(N) faire
b10 <-- b10 * b1 + Pos(N[i],Ch) - 1
Finpour
2) base10 <-- b10
3) Fin base10
{Transforme le nombre de base 10 en Base : b2}
0) Fonction base(N :entier, b2 :entier) :chaîne
1) b <--""
Tant que (N <> 0) faire
i <-- N mod b2
b <-- ch[i+1]+ b
N <-- N div b2
fintantque
2) Base <-- b
3) fin base
