Question

Crie um programa em pascal, que leia as notas bimestrais, calcule a média e informe se o aluno está Aprovado
(Md>=6.0), Reprovado (Md>5.0).

Answer 1

Resposta:

algoritmo "Média Aritmética"

// Função : Verificar se o aluno foi aprovado ou não

// Autor :

// Data : 18/07/2020

// Seção de Declarações  

var

media, nota1, nota2: float;

begin

// Seção de Comandos  

writeln("Digite a 1ª nota: ");

readln(nota1);

writeln("Digite a 2ª nota: ");

readln(nota2);

media <- (nota1 + nota2) / 2;

writeln("Média: ", media);

if media >= 6 then

begin

  writeln("Aprovado!")

else

  writeln("Reprovado!");

end;

end;

Explicação:

Espero ter ajudado!