Algoritmo: Linguagem do VisuAlg

 Ler 80 números e ao final informar quantos número(s) est(á)ão no intervalo entre 10 (inclusive) e 150 (inclusive).


Algoritmo: Linguagem do VisuAlg

algoritmo "ContandoN".

// Autor : Thiago Campos
// Data : 01/10/2012
// Seção de Declarações 
var
qtd: inteiro
n: vetor[1..5] de inteiro
i, j: inteiro

inicio
// Seção de Comandos 
   para i de 1 ate 80 passo 1 faca
        escreva("Informe o numero: ")
        leia(n[i])
   fimpara
   para j de 1 ate 5 passo 1 faca
        para i de 10 ate 150 passo 1 faca
             se n[j] = i entao
                qtd <- qtd + 1
             fimse
        fimpara
   fimpara
 
   escreva("Aparece(m) ", qtd, " vez(es).")

fimalgoritmo