Find repeating numbers in lists with Visualg

Navigation
2
  

Write a program that receives 100 numbers entered by the user. At the end the program displays how many numbers you enter are the same as the last number entered.

As far as I can go: 

algoritmo "semnome"
// Função :
// Autor :
// Data : 30/05/2017
// Seção de Declarações 
var
vet:vetor[1..10] de inteiro
NUM,i,igual:INTEIRO
inicio
Para i <- 1 ate 5 faca
   Escreva("Digite um numero: ")
   Leia(num)
fimpara
para i <- 1 ate 5 faca
   se(num = vet[5])entao
       igual <- num + vet[10]
   fimse
fimpara
Escreva(igual)
fimalgoritmo

How do I compare values and show how many numbers are the same?

    
asked by anonymous 31.05.2017 / 03:59

1 answer

3

That? 

algoritmo "semnome"
// Função :
// Autor :
// Data : 30/05/2017
// Seção de Declarações 
var
vet:vetor[1..100] de inteiro
i, igual : INTEIRO
inicio
Para i <- 1 ate 100 faca
   Escreva("Digite um numero: ")
   Leia(vet[i])
fimpara
para i <- 1 ate 99 faca
   se (vet[i] = vet[100]) entao
       igual <- igual + 1
   fimse
fimpara
Escreva(igual)
fimalgoritmo

If the last one is the previous one there should change this line: 

   se (vet[i] = vet[i + 1]) entao
    
31.05.2017 / 05:00
mongodb error getNextSequence is not defined Warning: mysqli_query () expects parameter 1 to be mysqli, integer given