Média da matriz no visualg

[Daniela Santos_141280 0]

Bom dia.. Estou tendo dificuldade para criar a média de uma matriz..

Meu problema, ler 10 notas de 5 alunos(5x10) e mostrar alunos com média acima de 6.

fiz isso

algoritmo "Notas_media_aluno"
// Função : ler nota de dez alunos e mostrar quem está com média acima de 6.
// Autor : Daniela santos
// Data : 11/07/2012
// Seção de Declarações 
var
Anotas: vetor [1..5, 1..10] de inteiro
linha, coluna: inteiro
media:real
inicio
// Seção de Comandos 
Para linha de 1 ate 5 faca
 Para coluna de 1 ate 10 faca
   Escreval("Informe a nota", coluna, " ", "para o aluno", linha,":")
   leia(Anotas[linha, coluna])
 fimpara
 fimpara
fimalgoritmo

[KhaosDoctor 242]

Depois disso adicione o mesmo For declarando um contador:

 

var
cont: inteiro

 

 

 

 

Para linha de 1 ate 5 faca

//Atribuindo reset a média
media<-0

//Somando média

Para coluna de 1 ate 10 faca

media = media + Anotas[linha,coluna]

 fimpara


//Criando uma média de 10 notas
media = media/10


//Verificação
Se media > 6.0 Então

cont = cont+1



fimse

 fimpara

//exibição
Escreva("O numero de alunos com media maior que 6 é: " cont)

fimalgoritmo