Question

faça um algoritmo que leia n números ( n < 200) e verifique quantos deles são iguais a um número k. Visualg

Answer 1

algoritmo "maiorquek"

// Data : 23/11/2017// Seção de Declarações 
var
n,k,aux,i,iguais : inteiro


nicio
escreval("Informe quantos números serão verificados n")
leia(n)
escreval("Informe o número a comparar k")
leia(k)
para i de 1 ate n faca
     escreval("Informe o elemento",i)
    leia(aux)
    se aux = k entao
       iguais <- iguais +1
    fimse
fimpara
escreval("Encontramos ",iguais," números iguais a ",k)



// Seção de Comandos 
fimalgoritmo