Média

Atividade

Faça um algoritmo que leia duas notas de um aluno, calcule a média das notas e informe: ‘APROVADO’, caso o aluno tenha média >= 7; ‘RECUPERAÇÃO’, caso o aluno tenha média entre 2.5 e 7; ‘REPROVADO’, caso o aluno tenha média menor ou igual a 2.5

Resposta

program media;
var nota1, nota2, media: real;
  Begin
  write ('Digite a primeira nota: ');
  read (nota1);
  write ('Digite a segunda nota: ');
  read (nota2);
  media:= (nota1+nota2)/2;
  if media >= 7 then write ('APROVADO');
  if (2.5<media) and (media>7) then write ('RECUPERAÇÃO');
  if media <= 2.5 then writeln ('REPROVADO');
end.

Um comentário em “Média

Deixe um comentário