L5 - 5 - Escreva um algoritmo que lê dois números inteiros e informa se o primeiro é múltiplo do segundo.

Escreva um algoritmo que lê dois números inteiros e informa se o primeiro é múltiplo do
segundo.

Algoritmo "multiplos"
Var
    a,b: inteiro
Inicio
    Leia(a,b)
    Se ( a MOD b = 0 ) entao
            Escreva(a," e ",b," sao multiplos!")
    Senao
            Escreva(a," e ",b," nao sao multiplos.")
    Fimse
fimalgoritmo