3) Faça um programa para apontar os resultados de uma pesquisa eleitoral para Presidente
da república de Kneippópolis, o mais novo país da América do Sul.Os candidatos são: Zico, RicardoKneipp,
Obina e Geninho. Escreva o nome do novo presidente do país com maior IDH do planeta.

Program algoritmo ;

var
cont, maior:inteiro;
voto:char;
perc1, perc2, perc3, perc4:real;
inicio
para cont:=1 to 3 do
inicio
escreva('Para zico-z, ricardo-r, obina-o, geninho-g:');
leia(voto);
se (voto=z) entao z:=z+1;
perc1:=z/3*100;
se voto = r entao r:=r+1;
perc2:=r/3*100;
se voto = o entao o:=o+1;
perc3:=o/3*100;
se voto = g entao g:=g+1;
perc4:=g/3*100;
fim;
inicio
se z>maior entao maior:=z;
se r>maior entao maior:=r;
se o>maior entao maior:=o;
se g>maior entao maior:=g;
escreva('O total de votos para zico foi:',z);
escreva('O percentual foi:',perc1);
escreva('O total de votos para ricardo foi:',r);
escreva('O percentual foi:',perc2);
escreva('O total de votos para obina foi:',o);
escreva('O percentual foi:',perc3);
escreva('O total de votos para geninho foi:',z);
escreva('O percentual foi:',perc4);
escreva(' O nome do mais novo presidente de Kneippópolis é!:',maior);
fim;
fim.