Prova Lógica

[danielswater 0]

E ai galera tudo certo? Seguinte, to para fazer uma prova agora e n to conseguindo resolver este algoritmo aqui. Já vi e achei algo aqui no forum mas mesmo assim não consegui entender. Segue o enunciado:

 

Uma loja de departamentos armazena em uma matriz os valores vendidos mês a mês em cada um de seus departamentos. Considerando que a loja tenha 5 departamentos (numerados de 1 a 5), faça um programa que leia mês a mês o faturamento de cada departamento. Ao final da leitura, o algoritmo deverá mostrar:

a) Qual foi o maior valor encontrado em um único mês, mostrando o mês em que foi encontrado e o departamento que registrou esse valor.

B) A média de faturamento da loja, mostrando os departamentos que ficaram abaixo da média de faturamento.

c) Qual foi o mês de maior faturamento em toda a loja. (peso 5,0 pontos)

 

Não estou conseguindo achar a opção b, ou seja, os deptos que ficam abaixo da media. Segue me codigo:

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 3/11/2009
// Seção de Declarações
var
abaixomedia: vetor[0..12] de inteiro
fatura: vetor[0..12,0..5] de numerico
somatotal, maiorvalor, media, maiorfat: numerico
depto, mes,linha, coluna: inteiro
inicio
// Seção de Comandos
somatotal <-0
media <-0

//preenchendo toda matriz e achando a media
para linha de 1 ate 12 passo 1 faca
   para coluna de 1 ate 5 passo 1 faca
      escreva ("mes: ", linha, " digite o total da fatura do Departamento:", coluna , " ")
      leia (fatura[linha,coluna])
      somatotal <- somatotal + fatura[linha,coluna]
      media <- somatotal / 60
   fimpara
fimpara

//achando o maior valor do mes e o dpto

maiorvalor <- fatura[1,1]
para coluna de 1 ate 5 passo 1 faca
   para linha de 1 ate 12 passo 1 faca
      se (fatura[linha,coluna] > maiorvalor) entao
         maiorvalor <- fatura[linha,coluna]
         mes <- linha
         depto <- coluna
      fimse
   fimpara
fimpara

//achando os dptos que ficaram abaixo da media
para linha de 1 ate 12 passo 1 faca
   para coluna de 1 ate 5 passo 1 faca


fimalgoritmo

Parei dai, dai não saio, será que tem alguma santa alma para me dar um help?

 

Desde já agradeço

[Victor Cometti 8]

E ai galera tudo certo? Seguinte, to para fazer uma prova agora e n to conseguindo resolver este algoritmo aqui. Já vi e achei algo aqui no forum mas mesmo assim não consegui entender. Segue o enunciado:

 

Uma loja de departamentos armazena em uma matriz os valores vendidos mês a mês em cada um de seus departamentos. Considerando que a loja tenha 5 departamentos (numerados de 1 a 5), faça um programa que leia mês a mês o faturamento de cada departamento. Ao final da leitura, o algoritmo deverá mostrar:

a) Qual foi o maior valor encontrado em um único mês, mostrando o mês em que foi encontrado e o departamento que registrou esse valor.

B) A média de faturamento da loja, mostrando os departamentos que ficaram abaixo da média de faturamento.

c) Qual foi o mês de maior faturamento em toda a loja. (peso 5,0 pontos)

 

Não estou conseguindo achar a opção b, ou seja, os deptos que ficam abaixo da media. Segue me codigo:

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 3/11/2009
// Seção de Declarações
var
abaixomedia: vetor[0..12] de inteiro
fatura: vetor[0..12,0..5] de numerico
somatotal, maiorvalor, media, maiorfat: numerico
depto, mes,linha, coluna: inteiro
inicio
// Seção de Comandos
somatotal <-0
media <-0

//preenchendo toda matriz e achando a media
para linha de 1 ate 12 passo 1 faca
   para coluna de 1 ate 5 passo 1 faca
      escreva ("mes: ", linha, " digite o total da fatura do Departamento:", coluna , " ")
      leia (fatura[linha,coluna])
      somatotal <- somatotal + fatura[linha,coluna]
      media <- somatotal / 60
   fimpara
fimpara

//achando o maior valor do mes e o dpto

maiorvalor <- fatura[1,1]
para coluna de 1 ate 5 passo 1 faca
   para linha de 1 ate 12 passo 1 faca
      se (fatura[linha,coluna] > maiorvalor) entao
         maiorvalor <- fatura[linha,coluna]
         mes <- linha
         depto <- coluna
      fimse
   fimpara
fimpara

//achando os dptos que ficaram abaixo da media
para linha de 1 ate 12 passo 1 faca
   para coluna de 1 ate 5 passo 1 faca


fimalgoritmo

Parei dai, dai não saio, será que tem alguma santa alma para me dar um help?

 

Desde já agradeço

 

para coluna de 1 ate 5 passo 1 faca
	vetor_departamento[coluna]=0
   para linha de 1 ate 12 passo 1 faca
      se (fatura[linha,coluna] > maiorvalor) entao
         maiorvalor <- fatura[linha,coluna]
         mes <- linha
         depto <- coluna
      fimse

	  vetor_departamento[coluna] = vetor_departamento[coluna] + fatura[linha,coluna]    
fimpara
	  vetor_departamento[coluna] = vetor_departamento[coluna]/12 //calculando a media 
	  soma_media_dep_ano = soma_media_dep_ano + vetor_departamento[coluna] //somando as medias de todos departamentos
fimpara

//calcula a media de venda dos departamentos
soma_media_dep_ano = soma_media_dep_ano/5

//imprime departamentos abaixo da media de venda anual
para dep de 1 ate 5 passo 1 faca
	se (vetor_departamento[dep] < soma_media_dep_ano) entao
		escreva ("Departamento: ", dep," abaixo da media anual, valor R$ ",vetor_departamento[dep])
	fimse	
fimpara

reposta da letra A e B

favor criar as variáveis que eu inclui