Algorithme conversion binaire décimal

Bonjour,

Tu prends ta séquence binaire de gauche vers la droite et tu ajoutes la valeur de chaque caractére (0 ou 1) multiplié par 2 à la puissance de la position de celui ci.
exemple avec 10010101
en partant de la gauche:

1x 2^0 = 1 x 1 = 1
0 x 2^1 = 0 x 2 = 0
1 x 2 ^2 = 1 x 4 = 4
0 x 2^ 3= 1 x 8 = 0
1 x 2^4 = 1x 16 = 16
0 x 2^5 = 1x32 = 0
0 x 2^6 = 1x64 = 0
0 x 2^7 = 1x128 = 128

soit 1 + 4 +16 +128 = 149

Utilise la fonction parseInt
System.out.println(Integer.parseInt("111111",2));

regardes ça http://sakoba.byethost13.com/2011/02/10/java-binary-to-decimal/

bonsoir

un code (récursif) en VBA
où
- Len(a) donne la longueur de la chaine a
- Left(b,1) donne le 1° caratere à gauche de la chaine b
- Right(b, Len(b) - 1)) donne la queue de b (b sauf le 1° caractere)

RQ. VBA est permissif et Left(b,1) est interpreté comme un nombre donc pour un algorithme propre utiliser Valeur(xxx) lorsque xxx est une chaine

Function bin_dec(ByVal b As String) As Long
If Len(b) = 1 Then
  bin_dec = b
Else
  bin_dec = 2 ^ (Len(b) - 1) * Left(b, 1) + bin_dec(Right(b, Len(b) - 1))
End If
End Function

bonne suite

re

un autre algorithme non récursif, toujours en VBA, avec TANTQUE mais pas de SI,
a toi de traduire
il decrit le nombre b de la gauche vers la droite (comme l'algorithme de Horner)

Function bindec(b As String) As Long
Dim som As Long, chi As Long
som = 0                    ' initialisation du total
While Len(b) > 1           ' tant que longueur de b > 1
  chi = Left(b, 1)         ' chi = premier chiffre à gauche de b
  som = (som + chi) * 2    '
  b = Right(b, Len(b) - 1) ' on recommence avec b auquel
Wend                       ' on a enlevé le 1° chiffre
bindec = som + b           ' il reste un seul chiffre à b
End Function

bon courage