Ler (num)
num1 <- num

Enquanto (num > 0) Fazer
 dig <- num MOD 10
 Se (dig MOD 2 <> 0) Então
    num1 <- num1 * 10 + dig
 FimSe
 num <- num DIV 10
Fim Enquanto
Escrever (num1)
Fim