Par ou impar qual n>

algoritmo "Atividade 7"
var
   n1, n2 : inteiro

inicio
   Escreva ("Escreva o primeiro número!")
   leia (n1)
   Escreva ("Escreva o segundo número!")
   leia (n2)

   limpatela

   Se (n1 > n2) entao
      Escreval ("O primeiro número digitado", n1, " é maior que o segundo número digitado", n2)
   senao
      Escreval ("O segundo número digitado", n2, " é maior que o primeiro número digitado", n1)
   fimse

   Se (n1 % 2 = 1) entao
      Escreval ("E o primeiro número", n1, " é ímpar!")
   senao
      Escreval ("E o primeiro número", n1, " é par!")
   fimse
fimalgoritmo