Como fazer um algoritmo que teste se um número é par?

Basta vc fazer uma condicional e verifcar se o resto desse número é 0, assim...

se(x%2 == 0)

{

       Então esse número é par

}

se não

{

      Ele é ímpar

}

o x é o número a ser dividido por dois, e a porcentegame significa obter o resto da divisão de um número por dois... se o resto da divisão for 0 então ele é um número par... :) 

Super obrigada Nat!

Uma alternativa Usando o VISUALG 3.0:

Algortimo "par"

Var x : inteiro

Inicio

   escreva("digite um número : ")     

   leia(x)

   SE (X MOD 2) = 0 ENTÃO

       escreval("Número é PAR ")

   SENÃO

       escreval("Número é IMPAR ")

    FIMSE

 Fimalgoritmo

Outra alternativa é:

SE INT(x/2) = x/2 ENTÃO

     escreval("Número é multiplo de 2, logo é PAR...")

FIMSE

PROFESSOR ANTONIO CARLOS NICOLODI

CRIADOR DO VISUALG 3.0