Conversão entre números decimais, octal e binários

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 31789
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
Sumário
O código do Microsoft Basic abaixo demonstra como executar as seguintes conversões entre decimal, octal e binários números:

  • Converter um número octal em um número decimal (base 10)
  • Converter um número decimal em um octal (base 8) número
  • Converter um número decimal em um número binário (base 2)
Mais Informações
O exemplo de código a seguir realizará as conversões:
' 1. Octal string to decimal Number:INPUT "INPUT Octal number:"; octal$PRINT VAL("&O" + octal$)' 2. Decimal Number to octal string:INPUT "INPUT Decimal number:"; DecimalPRINT OCT$(Decimal)' 3. Decimal Number to Binary string:Bin$ = ""INPUT "INPUT Decimal number:"; DecimalFOR i = 14 TO 0 STEP -1           ' Positive numbers only  pow2 = 2 ^ i  IF Decimal >= pow2 THEN     Decimal = Decimal - pow2: Bin$ = Bin$ + "1"  ELSE Bin$ = Bin$ + "0"  END IFNEXT iPRINT Bin$				
as informações acima se aplicam a maioria dos produtos Microsoft Basic, incluindo o seguinte básico:

  • Microsoft Visual Basic versão 1.0 para MS-DOS
  • Microsoft Visual Basic versões 1.0, 2.0, 3.0 para Microsoft Windows. Observação: Você precisará substituir a instrução INPUT no código acima com um recurso que é suportado neste produto, como uma caixa de texto usada com um procedimento de evento Click.
  • Microsoft Basic Compiler versão 1.0 para o Apple Macintosh
  • Versões de interpretador básico Microsoft 1.0, 1.01, 2.0, 2.1 e 3.0 para o Apple Macintosh
  • Microsoft QuickBasic Compiler versões 1.0, 1.01, 1.02, 2.0, 2.01, 3.0, 4.0, 4.0b e 4.5 para o IBM PC
  • Versões de Microsoft Basic Compiler 5,35 e 5.36 para MS-DOS
  • Microsoft Basic Compiler versão 6.0 para MS-DOS e MS OS/2
  • Microsoft Basic PDS versões 7.0 e 7.1 para MS-DOS e MS OS/2
  • Microsoft GW-Basic intérprete versão 3.2
VBmsdos QuickBas BasicCom 1.00 2.10 3.00 3.20 4.00 4.00b 4.50 6.00 6.00b 7.00 7.10

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 31789 - Última Revisão: 12/04/2015 09:02:39 - Revisão: 2.1

Microsoft Visual Basic for MS-DOS, Microsoft Visual Basic 1.0 Standard Edition, Microsoft Visual Basic 2.0 Standard Edition, Microsoft Visual Basic 3.0 Professional Edition, Microsoft Visual Basic 2.0 Professional Edition, Microsoft Visual Basic 3.0 Professional Edition, Microsoft BASIC Compiler 6.0b, Microsoft BASIC Interpreter 1.0, Microsoft BASIC Interpreter 1.01 para Macintosh, Microsoft BASIC Interpreter 2.0, Microsoft BASIC Interpreter 2.1 para Macintosh, Microsoft BASIC Interpreter 3.0 para Macintosh, Microsoft QuickBasic 1.0, Microsoft QuickBasic 1.01, Microsoft QuickBasic 1.02, Microsoft QuickBasic 2.0, Microsoft QuickBasic 2.01, Microsoft QuickBasic 3.0, Microsoft QuickBasic 4.0, Microsoft QuickBASIC 4.0b, Microsoft QuickBasic 4.5 for MS-DOS, Microsoft BASIC Compiler 6.0, Microsoft BASIC Professional Development System 7.0, Microsoft BASIC Professional Development System 7.1, Microsoft GW-BASIC Interpreter 3.20

  • kbnosurvey kbarchive kbmt KB31789 KbMtpt
Comentários