Domanda Convertitore da 10------------->bin

Stato
Discussione chiusa ad ulteriori risposte.

</Singh>™

Utente Palladium
8 Marzo 2013
5,571
146
1,706
1,448
Salve raga,volevo creare un convertitore da decimale a bianario con auto it
solo che non riesco a capirci molto
Codice:
MsgBox(4096,"Benvenuto","Convertitore da Decimale a binario")
Local $i=InputBox(0,"Inserisci Numero","")
iF Mod($i,2) = 0 Then 
Do
mod($i,2) 
until $i=0 
MsgBox(0,"",$i)
EndIf
Quel codice li è sbagliato,ero riusciato a farne uno decente ma me lo sono dimenticato
Aiutatemi voi
 
Per convertire in binario vai di divisione continua, continui a dividere per 2 finche' non sei a zero e i resti in ordine inverso ti danno il numero in binario, ad esempio per convertire 10 in binario:

Codice:
10/2=5 (resto 0)
5/2=2  (resto 1)
2/2=1  (resto 0)
1/2=0  (resto 1)
quindi prendendo i resti in ordine inverso 10[sub](10)[/sub]=1010[sub](2)[/sub]

tradurre tutto cio' in codice e' piuttosto semplice, ma non ho idea del linguaggio che stai usando...
 
Chiedere codici pronti per una cosa del genere dopo che ti e' stata spiegata la teoria... :oddio:

E se pensi che mi vado a leggere la sintassi di autoit per farti questa cavolata ti sbagli di grosso, ti faccio un esempio in pseudocodice ed uno in Lua (perche' fra i linguaggi che conosco e' quello con la sintassi piu' comprensibile), non dovresti avere grossi problemi a tradurli in autoit...

pseudocodice
Codice:
res=new string
    repeat
        res=res+(n mod 2)
        n=n div 2
    until n=0
reverse(res)

Lua
Codice:
function toBinary(n)
    res=""
    repeat
        res=res..math.fmod(n,2)
        n=math.floor(n/2)
    until n==0
return string.reverse(r)
end
 
  • Mi piace
Reazioni: .xSingh.
Stato
Discussione chiusa ad ulteriori risposte.