Variáveis:  Numero, Dividendo, Duplica, Somatorio, Resto, Parcela 

Pseudocódigo

Ler Numero
Dividendo ← Numero
Duplica ← Falso
Somatorio ← 0
Enquanto Dividendo <> 0
  Resto ← Dividendo Mod 10
  Se Duplica
    Então
      Parcela ← Resto * 2
      Se Parcela > 9
        Então
         Parcela ← 1 + (Parcela - 10)
      Fim Se
    Senão
      Parcela ← Resto
  Fim Se
  Somatorio ← Somatorio + Parcela   
  Duplica ← Not Duplica
  Dividendo ← Dividendo \ 10
Fim Enquanto
Se Somatorio Mod 10 = 10
  Então
    Escrever Numero "é válido"
  Senão
    Escrever Numero "inválido"
Fim Se

Nome do Projecto

 Tipo

Código Fonte

Mod10

Standard EXE

Mod10