Fiz do jeito mais simples para não te complicar rsrs.
Caso esteja errado, perdoe-me
fonte: http://www.somatematica.com.br/fundam/medias.php
____________________________
algoritmo "semnome"
// Função :
// Autor :
// Data : 28/02/2011
// Seção de Declarações
var
Nota1, nota2, nota3: real
resul, resul1, resul2, resul3: real
inicio
//Entrada de dados
Escreva ("Entre com a primeirea nota: ")
leia (nota1)
Escreva ("Entre com a segunda nota: ")
leia (nota2)
Escreva ("Entre com a terceira nota: ")
leia (nota3)
//processamento
Resul1<- (nota1*0.20)
Resul2<- (nota2*0.30)
Resul3<- (nota3*0.50)
Resul<- (resul1 + resul2 + resul3) / 1
//saída de dados.
Escreva (resul)
fimalgoritmo