A05 VisualG - Media Nota Utilizando Peso

Código que cacula a Média final de um aluno no VisualG com a utilização de pesos - Utilizando o Se (if). Dúvidas ou sugestões? e-Mail: mm_rg@live.com