Question

Crie um programa em pascal que receba as 4 notas (de 0 a 10 ponto) de um aluno e, por meio de um procedimento calcule a média desse aluno e informe se ele foi aprovado ou reprovado. Considere que para ser aprovado a aluno deve ter média maior ou igual a 6.

Answer 1

Resposta:

Escreva("digite nota 1 ")

Leia(nota1)

Escreva("digite nota 2 ")

Leia(nota2)

Escreva("digite nota 3 ")

Leia(nota3)

Escreva("digite nota 4 ")

Leia(nota4)

Media <- (nota1 + nota2 + nota3 + nota4) / 4

Se (media >= 6) então

Escreva("aprovado")

Senao

Escreva ("reprovado")