Se quiser, baixe esse app ¬ Visualg, copie o código, cole, teste, altere, treine, seja feliz! Sorria! Mesmo, se o mudo fizer careta (RS!).
Exercícios
algoritmo "ParImpar Função"
var
  N: Inteiro
  
R: Caractere
   
R: Caractere
Funcao ParOuImpar(V: Inteiro): Caractere
    Inicio
    
   Se (V%2 = 0) entao
      
      Retorne "PAR"
      
   senao
      
      Retorne "IMPAR"
      
   FimSe
FimFuncao
inicio
   Escreva("Digite um numero: ")
   
Leia(N)
R <- ParOuImpar(N)
Escreva ("O numero ", N, " e um valor ", R)
Leia(N)
R <- ParOuImpar(N)
Escreva ("O numero ", N, " e um valor ", R)
