Par e Impar </> 15,50

Algoritmo "Atividade 6"
Var
   a: inteiro
Inicio

   escreva("Digite um numero:")
   leia(a)

      se (a % 2 = 0) então
      escreva("O número é par ")
      se (a > 15) então
      escreva("E é maior que 15.")
      fimse

      senão

      escreva("O número é ímpar ")
      se (a < 50) então
      escreva("e é menor que 50.")
      fimse
      fimse

FimAlgoritmo