algoritmo “Dec2Bin”
var
b: literal
n, q, r: numérico
início
b <- “ “
escreva(“Entre com um número”)
leia(n) //aqui n=29
q <- n //q=29
r<- q%2 //r=29%2 =1
q <- q\2 //29\2 =14
se r = 0 então //F
b <- “0” + b
senão
b <- “1” + b //b="1" +""
fimse
r <- q%2 //q%2 =0
q <- q\2 //q\2 =7
se r = 0 então //V
b <- “0” + b //"0" + "1"
senão
b <- “1” + b
fimse
r <- q%2 //r=0
q <- q\2 //q=3
se r = 0 então //V
b <- “0” + b //"0" + "1"+“0”
senão
b <- “1” + b
fimse
r <- q%2 //r=1
q <- q\2 //q=1
se r = 0 então //F
b <- “0” + b
senão
b <- “1” + b //"0" + "1"+“0” +"1"
fimse
r <- q%2 //r=0
q <- q\2 //q=0
se r = 0 então //V
b <- “0” + b ////"0" + "1"+“0” +"1"+"0"
senão
b <- “1” + b
fimse
escreva(n, “ em decimal é representado por “, b, “ em binário”) //29, em decimal é
representado por 010110 em binário.
fimalgoritmo
quarta-feira, 20 de outubro de 2010
Assinar:
Postar comentários (Atom)
0 comentários:
Postar um comentário
Post sua menssagem...