Exercício 10 Estrutura de Seleção - Pascal

10) A partir da idade informada de uma pessoa, elabore um algoritmo que informe a sua classe eleitoral, sabendo que menores de 16 não votam, que o voto é obrigatório para adultos entre 18 a 65 anos e que o voto é opcional para eleitores entre 16 e 18, ou maiores de 65 anos.

Program Voto_Idade ;
var
 idade: integer;
 Begin
  Write('Informe Idade: ');
  Readln(idade);
   if idade < 16 then
    Writeln('Menores de 16 anos Nao Votam')
   else if (idade > 18) and (idade < 65) then
    Writeln('Voto Obrigatorio')      
   else if (idade >= 16) and (idade <= 18) or (idade > 65) then
    Writeln('Voto Opcional') ;
  Writeln('                        by Marcus Vinicius');  
 End.

Categories: Pascal , Programação