ALGORITMO WALTER ELEICAO

EXERCICIO
Na eleicao tivemos 6 candidatos com seus codigos respectivos de 1 a 6. O voto 7 e nulo, oo 8 em branco.
Elabore um algoritmo, que possa ser elaboradoo para outras eleicoes.

A) O nome do candidato eleito;
B) O total de votos de cada candidato
C) O total de votos nulos;
D) O total de votos em Branco;
E) Percentual de votos em Branco;


ATRIBUICAO = <-

Programa eleicoes;

VARIAVEL

V1 <- inteiro (3) <-0;

V2 <- inteiro (3) <-0;

V3 <- inteiro (3) <-0;

V4 <- inteiro (3) <-0;

V5 <- inteiro (3) <-0;

V6 <- inteiro (3) <-0;

N7 <- inteiro (3) <-0;

B8 <- inteiro (3) <-0;

percen_b <- real ( 99v99 ) <- 00v00;

controle <- inteiro (3) <-0;

vot_c <- inteiro (3) <-0;

COSTANTE C1 <- 1;

C2 <- 2;

C3 <- 3;

C4 <- 4;

C5 <- 5;

C6 <- 6;

C7 <- 7;

C8 <- 8;

INICIO

repita

escreva" De seu voto : CANDIDATO 1 VOTE 1, CANDIDATO 2 VOTE 2, CANDIDATO 3 VOTE 3, CANDIDATO 4 VOTE 4, CANDIDATO 5 VOTE 5, CANDIDATO 6 VOTE 6, NULOS VOTE 7, EM BRANCO VOTE 8 ." vot_c; leia vot_c; se vot_c=c1 entao v1 <- v1+1 se_nao se vot_c=c2 entao v2 <- v2+1 se_nao se vot_c=c3 entao v3 <- v3+1 se_nao se vot_c=c4 entao v4 <- v4+1 se_nao se vot_c=c5 entao v5 <- v5+1 se_nao se vot_c=c6 entao v6 <- v6+1 se_nao se vot_c=c7 entao n7 <- n7+1 se_nao se vot_c=c1 entao b8 <- b8+1 se_nao fim_se; fim_se; fim_se; fim_se; fim_se; fim_se; fim_se; fim_se; controle <- controle + 1: ate que controle > 232;

se (v1>v2) e (v1>v3) e (v1>v4) e (v1>v5) e (v1>v6)
entao
imprima" O candidato 1 foi eleito"
se_nao
se (v2>v1) e (v2>v3) e (v2>v4) e (v2>v5) e (v2>v6)
entao
imprima" O candidato 2 foi eleito"
se_nao
se (v3>v1) e (v3>v2) e (v3>v4) e (v3>v5) e (v3>v6)
entao
imprima" O candidato 3 foi eleito"
se_nao
se (v4>v1) e (v4>v2) e (v4>v3) e (v4>v5) e (v4>v6)
entao
imprima" O candidato 4 foi eleito"
se_nao
se (v5>v1) e (v5>v2) e (v5>v3) e (v5>v4) e (v5>v6)
entao
imprima" O candidato 5 foi eleito"
se_nao
se (v6>v1) e (v6>v2) e (v6>v3) e (v6>v4) e (v6>v5)
entao
imprima" O candidato 6 foi eleito"

fim_se; fim_se; fim_se; fim_se; fim_se; fim_se;

imprima"O candidato 1 com" v1",O candidato 2 com" v2",O candidato 3 com" v3",O candidato 4 com" v4",O candidato 5 com" v5",O candidato 6 com" v6", Votos Nulos "N7 ", Votos em Branco " B8;

Percen_b <- (b8*100) / (controle -1 ); Imprima " Percentual de votos em brancos, "percen_b; FIM.