3.21 Faça um programa que peça um número inteiro e //determine se ele é ou não um número primo. //Um número primo é aquele que é divisível somente por ele mesmo //e por 1.

Algoritmo "Algoritmo 3.21"
// Disciplina   : ALGORITMOS
// Professor    : ANGELO DA CUNHA SÁ
//3.21 Faça um programa que peça um número inteiro e
//determine se ele é ou não um número primo.
//Um número primo é aquele que é divisível somente por ele mesmo
//e por 1.
Var
   // Seção de Declarações das variáveis
   i,numero,cont:inteiro

Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   Escreval("Digite um numero..")
   leia(numero)
   para i:=1 ate numero faca
      se numero mod i = 0 entao
         cont:=cont+1
      fimse
   fimpara
   se cont<=2 entao
      escreval("O numero ",numero, " é primo!")
   senao
      escreval("O numero ",numero, " não é primo!")
   fimse
Fimalgoritmo