Alg1 - 2ªlista. 16 - Escreva um algoritmo que leia um valor composto apenas de 0’s e 1’s representando um número na base binária (com até 6 dígitos...

Escreva um algoritmo que leia um valor composto apenas de 0’s e 1’s representando um número na base binária (com até 6 dígitos ou bits). O algoritmo deve escrever esse mesmo número na base decimal. A conversão de binário para decimal é feita somando –se os produtos de cada digito do número binário, por seu peso, sendo que o digito mais à direita tem peso 1 (2°), o seguinte tem
peso 2 (2¹), 4 (2²), 8 (2³), etc. Por exemplo 110101 é 53 .
(1x32 + 1x 16 + 0x8 + 1x4 + 0x 2 + 1x1 = 32 + 16 + 0 + 4 + 0 + 1 = 53)

________________________________________________________________

algoritmo "De binário pra decimal "
// Função :
// Autor :
// Data : 04/09/2010
// Seção de Declarações

var
binario,decimal,n1,n2,n3,n4,n5,n6 : numerico
inicio
escreva ("Digite o número binário apertando enter após cada dígito: ")
leia(n1,n2,n3,n4,n5,n6)
decimal<- ((n1*(2^5))+(n2*(2^4))+(n3*(2^3))+(n4*(2^2))+(n5*(2^1))+(n6*(2^0))))
escreva ("O número binário", n1,n2,n3,n4,n5,n6 ," em decimal é: ", decimal)

fimalgoritmo