Svp aidez moi pour terminer cette algorithme :(
ben-jelloun
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
ben-jelloun Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
ben-jelloun Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Svp je suis besoin de terminer cette algorithme et de le correcter
c'est de convertir d'un nombre entier vers les autres bases ( 2;8;16) ;
(l'algorithme c'est : )
private sub cv_click()
if n = "0" then
"nb="0":no ="0":nh="0
else
(d= val(n
while d <>0
r= d mod2
nb= str(r) & nb
d=d/2
whend
(d= val(n
while d <> 0
r= d mod8
no= str(r) & no
d=d/8
whend
"ici c'est l'algorithme pour la base 16 "
je ne sais pas le terminer
end if
end sub
remarque ;
dont : n = nombre entier
no = nombre octal
nh = nombre hexadecimal
nb = nombre binnaire
please j'attend vos réponses
il faut pour demain "inchaallahe"
c'est de convertir d'un nombre entier vers les autres bases ( 2;8;16) ;
(l'algorithme c'est : )
private sub cv_click()
if n = "0" then
"nb="0":no ="0":nh="0
else
(d= val(n
while d <>0
r= d mod2
nb= str(r) & nb
d=d/2
whend
(d= val(n
while d <> 0
r= d mod8
no= str(r) & no
d=d/8
whend
"ici c'est l'algorithme pour la base 16 "
je ne sais pas le terminer
end if
end sub
remarque ;
dont : n = nombre entier
no = nombre octal
nh = nombre hexadecimal
nb = nombre binnaire
please j'attend vos réponses
il faut pour demain "inchaallahe"
A voir également:
- Svp aidez moi pour terminer cette algorithme :(
- Logiciel algorithme euromillion - Télécharger - Loisirs créatifs
- Impossible de terminer l'opération car le fichier contient un virus - Forum Virus
- Impossible de terminer l’opération car virus Win 7 - Forum Virus
- Imovie doit terminer d'autres tâches avant d'effectuer cette opération - Forum MacOS
- Algorithme euromillion excel gratuit ✓ - Forum VB / VBA