Discussion :

[VassR]

Bonjour tout le monde,

J'ai un petit problème lors de la résolution de mon algorithme. Voici le sujet :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
On vous demande d'écrire un algorithme permettant de convertir un nombre décimal en nombre binaire.
Rappels :
             - mod : reste de division entière
             - numch(num) : convertit un nombre (num) en chaîne 'num'

Le problème c'est que je n'arrive pas à mettre en chaîne les 0 et les 1 et aussi qu'il faudra inverser l'ordre de ces nombres car lors de divisions successives par 2, le poids le plus faible et le premier nombre.

Voici mon début :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

Algorithme decbin
VAR 
nb1 : entier       /* Nombre décimal de départ
nb2 : entier       /* Résultat de la division
reste : entier     /* Reste de la division
nbbin : entier     /* Nombre binaire final

Début
 Afficher ('Saisir un nombre décimal")
 Saisir (nb1)
 nb2 := 0
 reste := 0
 nbbin := 0
  Tantque nb1 >= 1 Faire
     nb2 := nb1 DIV 2
     reste := nb1 MOD 2
     nb1 := nb2
     nbbin := numch(reste) /* C'est ici que j'ai un problème, je n'arrive pas à mettre successivement les 0 et les 1 :?

Je pense qu'il faut imbriquer une nouvelle structure itérative mais je calle...

Merci de bien vouloir m'aider.

++

[Zavonen]

Pour ce genre de chose, le mieux c'est encore le récursif:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
def DecToBin (n):
    if n==0:
        return
    else:
        DecToBin(n/2)
        print n%2,

En gros ça marche avec un 'petit' bug, à toi de le trouver.

[phryte]

Slt.
Un exemple sous Matlab :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
function [B] = decbinen(n)
Q = 2; B =  '';
while Q >= 2
 Q = fix(n/2); R = n-2*Q; B = [num2str(R) B];
 n = Q; 
end; 
B = [num2str(Q) B];