Algoritmo 3.21

Algoritmo "Algoritmo 3.21"
//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.
// Professor   : Angelo da Cunha Sá
// Data atual  : 25/10/2017
Var
   // Seção de Declarações das variáveis
   n,a,i:inteiro
Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   escreval("digite um numero")
   leia(n)
   para i:=1 ate n faca
      se n mod i = 0 entao
         a:=a+1
      fimse
   fimpara
   se a<=2 entao
      escreval("Este numero é primo")
   senao
      escreval("Este numero não é primo")
   fimse
Fimalgoritmo