Lista 02 - DCC/UFMG

38) Construa um algoritmo em PORTUGOL para determinar a situação
(APROVADO/EXAME/REPROVADO) de um aluno, dado a sua freqüência (FREQ)
(porcentagem de 0 a 100%) e sua nota (NOTA) (nota de 0.0 a 10.0), sendo que:
Condição
Freqüência até 75%
Freqüência entre 75% e 100% e Nota até 3.0
Freqüência entre 75% e 100% e Nota de 3.0 até 7.0
Freqüência entre 75% e 100% e Nota entre 7.0 e 10.0
Situação
Reprovado
Reprovado
Exame
Aprovado
algoritmo L2P38;
var
real: FREQ, NOTA;
leia(NOTA,FREQ);
início
se ( FREQ < 75 ) então
imprima("REPROVADO");
senão-se ( NOTA < 3 ) { FREQ >= 75 } então
imprima("REPROVADO");
senão-se ( NOTA >= 3 ) e ( NOTA < 7 ) então
imprima("EXAME");
senão
imprima("APROVADO");
fim-se
fim
program l2p38;
var
FREQ, NOTA: real;
begin
write('Digite a Nota: ');
readLn(NOTA);
write('Digite a Frequencia: ');
readLn(FREQ);
write('Situacao ');
if ( FREQ < 75 ) then
writeLn('REPROVADO')
else if ( NOTA < 3 ) { FREQ >= 75 } then
writeLn('REPROVADO')
else if ( NOTA >= 3 ) and ( NOTA < 7 ) then
writeLn('EXAME')
else
writeLn('APROVADO');
end.
NOTA = input('Digite a Nota: ');
FREQ = input('Digite a Frequencia: ');
disp('Situacao ');
if ( FREQ < 75 )
disp('REPROVADO');
elseif ( NOTA < 3 ) % FREQ >= 75
disp('REPROVADO');
elseif ( NOTA >= 3 ) & ( NOTA < 7 )
disp('EXAME');
else
disp('APROVADO');
end
UFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 50