KB-47098: Convertendo valor decimal para binário.

Descrição:

Como converter um valor decimal para binário?

Solução:

Para fazer esta conversão, deve-se dividir o valor por 2, pegar o resto da divisão (será sempre 0 ou 1) e concatenar este dígito ao número binário, sempre à esquerda. Repita este processo até que o valor original seja menor que 2.

No vbScript, o operador que calcula o resto de uma divisão é o Mod. Veja abaixo um exemplo de script:

meu_valor = InputBox(“Digite o valor desejado em decimal:”)
 
valor_binario = “”
while meu_valor >= 2
                valor_binario = (meu_valor Mod 2) & valor_binario
                meu_valor = int(meu_valor / 2)
wend
valor_binario = meu_valor & valor_binario
 
MsgBox valor_binario
Print Friendly, PDF & Email

Este artigo foi útil? Was this helpful?

Classificação média - Average rating 0 / 5. Count: 0

Leave a Reply

Your email address will not be published.Required fields are marked *