algoritimo

Algoritmo TestaIgualdade

Variaveis

   Inteiro: Numero1, Numero2;

Inicio

   Leia(Numero1);

   Leia(Numero2);

   Se (Numero1 = Numero2) Entao

      Escreva(“Os números informados são iguais”);

   Senão

      Escreva(“Os números informados são diferentes”);

Fim

Algoritmo TestaParidade

Variaveis

   Inteiro: Numero;

Inicio

   Leia(Numero);

   Se (RESTO(Numero, 2) = 0) Entao

      Escreva(“O número informado é par.”);

   Senão

      Escreva(“O número informado é ímpar.”);

Fim

Algoritmo EstabeleceOrdemCrescente

Variaveis

   Inteiro: A, B, Aux;

Inicio

   Leia(A);

   Leia(B);

   Se (A > B) Entao

      Inicio

         Aux <- a="" span="">

         A <- b="" span="">

         B <- aux="" span="">

      Fim

   Escreva(“A e B em ordem crescente: ”, A, B);

Fim