inicio
inteiro maior,menor,res;
escreva("digite o maior número: ");
leia(maior);
leia("digite o menor número: ", menor);
enquanto (menor != 0)

inicio

res ← maior mod menor;
maior ← menor;
menor ← res;

fim

imprima("o mdc entre os números é igual a", maior);
fim