Algoritmo "NÚMEROS PRIMOS"
// Disciplina   : [DESVENDANDO ESSA CAIXA PRETA, MISSÃO PRATICA NIVEL 1]
// Professor   : FACULDADE ESTÁCIO
// Descrição   : FORNECER UM NÚMERO (N) PARA O ALGARITMO IMPRIMIR E SOMAR TODOS OS NÚMEROS PRIMOS IGUAL OU MENOR QUE (N)
// Autor(a)    : JOÃO LUIZ SILVA TAVARES
// Data atual  : 21/08/2022
// Vetor
Var
// Seção de Declarações das variáveis 

soma: vetor[0..7,0..1] de inteiro
linha,coluna: inteiro
nd, c, i,p, g: inteiro

Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
  nd<-7
   para linha de 0 ate nd faca
      p<-0
   para coluna de 0 ate linha faca
      se(linha mod coluna=0) entao
                  p<-p+1
                  soma[linha]<-linha
            fimse
     fimpara

     se (p=2) entao
        escreval ("O número",linha," é Primo")

        fimse
fimpara
g<-soma[linha]
escreval("Soma de todos os valores primos menores ou igual a 7 é: ",g +(g+1))


Fimalgoritmo