SE e SENAO - PAR ou IMPAR.alg

algoritmo "PAR OU IMPAR - SE e SENAO"
// Função : Identificar se um número é par ou impar
// Autor : Ila Carolina de Abreu Santos
// Data : 08/09/2020
// Seção de Declarações 
var
n1: inteiro
inicio
escreva("Digite um número: ")
leia(n1)
se (n1 % 2 = 0) entao
escreval("O número ",n1, " é PAR")
senao
escreva("O número ",n1, " é IMPAR")
fimse
fimalgoritmo