Onde estou errando?

[Visitante]

Pessoal estou fazendo um algoritmo que converte números decimais em binários, segue um trecho do mesmo:

var
i,num,x: inteiro
y: caractere
resposta: caractere

inicio

resposta<-s
enquanto(resposta=s)faca


escreva(Entre com o numero decimal)
leia(x)

num<-x

para i de 1 ate 10 faca 
      se(x mod 2) = 0 então
         y<-0 + y
      senao
         y<-1 + y
fimse

x<- x div 2

fimpara

escreva(resultado,y)


escreva(deseja fazer novamente?)
leia(resposta)
fimenquanto


fimalgoritmo

A minha dúvida é o seguinte: rodo na primeira vez e tudo ok mas daí eu tenho uma opção que pergunto se o usuário quer continuar e fazer mais uma conversão, daí quando o programa roda de novo no resultado aparece os dois juntos! Aparece o resultado anterior + o resultado atual (Ex: converter 37 em decimal aparece 100101 e daí se eu quiser fazer de novo e dessa vez digitar 10 o resultado fica 1001011010!) Não sei se ficou claro a pergunta se deu para entender. Acho que se usa um limpa tela em algum lugar mas testei vários e não deu certo!

[LNW]

Olá Mi,

Lá no início, logo após o enquanto, você precisa limpar a variável y:

Adicione:

y <- ""

LNW

[Visitante]

LNW Muito obrigado! Agora deu certo! Detalhe simples né, eu quebrei tanto a cabeça por um detalhe rsrs! Mas é assim mesmo, no início a gente quebra a cabeça e depois nunca mais esquece! Tópico Resolvido! Obrigado!

[DiF]

Caso o autor necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.