CALCULER LA VALEUR BINAIRE D'UN NOMBRE
cs_Urgo
Messages postés
780
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
16 avril 2009
-
3 nov. 2003 à 22:17
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 11 juin 2006 à 22:24
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 11 juin 2006 à 22:24
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/17665-calculer-la-valeur-binaire-d-un-nombre
https://codes-sources.commentcamarche.net/source/17665-calculer-la-valeur-binaire-d-un-nombre
11 juin 2006 à 22:24
http://www.commentcamarche.net/base/binaire.php3
11 juin 2006 à 14:11
mais un commentaire ecrie de dedans le nom du site
!!!!!!!!!!!!!!!!!!!!!!!svp svp!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!svp svp!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
10 juin 2006 à 16:19
10 juin 2006 à 16:08
(svp)
A+
3 nov. 2003 à 22:22
Dim Ret As String
If Dec 0 Then Ret "0"
While Dec > 0
Ret = (Dec And 1) & Ret
Dec = Dec 2
Wend
Binaire = Format(Ret, String(8 * (1 + Len(Ret) 8), "0"))
End Function
L'avantage, c'est qu'on ne se base pas sur le symbole virgule, qui peut changer d'un systeme a un autre.
de plus, une simpe comparaison binaire est plus rapide qu'un Instr
Enfin, ca prends en compte des nombres plus grands que 65535...
3 nov. 2003 à 22:17
C'est assez bien expliqué ton truc, mais est-ce vraiment utile comme source ?
Toute personne se servant d'un ordinateur et s'intéressant un minimun à la programmation devrait connaître ça.
En clair, cette source convient parfaitement aux débutants et aux petits, et vu que t'as l'air d'avoir prit du plaisir à faire ça je te met un 7, je suis gentil. :p