2

var
voto:inteiro
candidato1:inteiro
candidato2:inteiro
candidato3:inteiro
candidato4:inteiro
nulos:inteiro
branco:inteiro
inicio
candidato1<-0
candidato2<-0
candidato3<-0
candidato4<-0
nulos<-0
brancos<-0

para n de 1 ate 10000 faca
escreva("Vote: ")
leia(voto)
se voto=1 entao
	candidato1<-candidato1+1
fimse
se voto=2 entao
	candidato2<-candidato2+1
fimse
se voto=3 entao
	candidato3<-candidato3+1
fimse
se voto=4 entao
	candidato4<-candidato4+1
fimse
se voto=5 entao
	nulos<-nulos+1
fimse
se voto=6 entao
	brancos<-brancos+1
fimse
fimpara
escreval("Candidato 1:",candidato1)
escreval("Candidato 2:",candidato2)
escreval("Candidato 3:",candidato3)
escreval("Candidato 4:",candidato4)
escreval("Nulos:",nulos)
escreval("Brancos:",brancos)
fimalgoritmo