QUANTIDADE DE PRIMOS ENQUANTO Exemplos de Algoritmos

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "gfdg"
// Função :
// Autor :
// Data : 29/09/2017
// Seção de Declarações
var
numero, resto, i, qtresto, qtprimos: inteiro
inicio
numero<-1
enquanto (numero<>0) faca //enquanto for diferente de zero, ele vai executar
resto<-0
qtresto<-0
escreval ("Digite um número: (Caso queira sair, digite 0 (zero).")
leia (numero)
para i de 1 ate numero faca
resto<- numero mod i
se (resto=0) entao
qtresto<-qtresto+1
fimse
fimpara
se (qtresto=2) entao
escreval ("O numero,",numero, " é primo")
qtprimos<-qtprimos+1
senao
escreval ("O numero,",numero, " não é primo")
fimse
fimenquanto
 escreval ("A quantidade de números primos é:", qtprimos)
// Seção de Comandos
fimalgoritmo