Question

Uma eleição a presidente do grêmio estudantil estão disputando três candidatos (Carmen, Silvio e Geraldo). Faça um algoritmo onde após ler o nome do candidato deverá ser informado o número de votos de cada candidato bem como a porcentagem de votos de cada um. Para finalizar a digitação o usuário deverá digitar fim para o nome do candidato.

Answer 1

Var
cand1, cand2, cand3: caracter
v1, v2, v3, voto, cont, total: inteiro
t1, t2, t3: real
Inicio
cand1 := "Carmen"
cand2 := "Silvio"
cand3 := "Geraldo"
repita
Escreval("Digite o número dos candidatos abaixo")
Escreval("1 - Geralda")
Escreval("2 - Silvio")
Escreval("3 - Geraldo")
Escreval("4 - Fim")
Leia (voto)
Se (voto = 1) entao
v1 := v1 + 1
cont := cont + 1
Escreval("Obrigado Pelo seu voto")
limpatela
senao
Se (voto = 2) entao
v2 := v2 + 1
cont := cont + 1
Escreval("Obrigado Pelo seu voto")
limpatela
senao
Se (voto = 3) entao
v3 := v3 + 1
cont := cont + 1
Escreval("Obrigado Pelo seu voto")
limpatela
senao
Se (voto = 4) entao
limpatela
Escreval("Calculando a porcentagem de votos...")
fimse
fimse
fimse
fimse
total := total + 1
ate (voto = 4)
total := total - 1
t1 := (100*v1/total)
t2 := (100*v2/total)
t3 := (100*v3/total)
Escreval ("O Candidato: ", cand1, " recebeu: ", v1, " votos. Percentual de: ", t1:2:2, " %")
Escreval ("O Candidato: ", cand2, " recebeu: ", v2, " votos. Percentual de: ", t2:2:2, " %")
Escreval ("O Candidato: ", cand3, " recebeu: ", v3, " votos. Percentual de: ", t3:2:2, " %")
Fimalgoritmo