Question

crie um algoritmo para ler uma letra do alfabeto e mostrar uma mensagem: se é vogal ou consoante.

Answer 1

Resposta:

Var

  L: caracter

Inicio

  escreva("Digite uma letra: ")

  leia(L)

  se ((maiusc(L) >= "A") E (maiusc(L) <= "Z")) entao

  se ((maiusc(L) = "A") OU (maiusc(L) = "E") OU (maiusc(L) = "I") OU (maiusc(L) = "O") OU (maiusc(L) = "U")) entao

     escreval("É uma vogal")

  senao

       escreval("É uma consoante")

  fimse

  senao

       escreval("Não é uma letra")

  fimse

Fimalgoritmo

Explicação:

Português estruturado (VISUALG)