algoritmo

[Patvila 0]

será que alguém poderia me dar uma luz...... sou aluna do Curso de Web Desing e Programação, estou no 1º período deste curso e estou sofrendo na resolução destas questão :Considere que determinada empresa tem registrado numa tabela, os consumos mensais de energia elétrica ao longo de 20 anos. Cada linha representa um ano e cada coluna um mês. Utilizando todos os conceitos aprendidos de lógica de programação, faça um algoritmo que peça para o usuário digitar os valores nesta tabela (Segue um exemplo abaixo). Após a digitação de todos os valores, determine o consumo médio por ano, guardando o valor encontrado de cada ano em um vetor. Ao final, escreva o valor do consumo médio de cada ano (por exemplo, Em 1987, o consumo médio foi de .... Em 1988, o consumo médio foi de...., etc).Tabela Exemplo Jan Fev Mar Abr Mai Jun Jul Ago Set Out Nov Dez1987 100 530 500 300 303 300 440 456 345 234 333 4671988 123 345 456 432 256 423 324 564 345 344 543 345. . . 2005 809 456 312 654 300 400 432 453 442 410 334 2012006 345 600 456 682 400 324 345 308 299 303 356 126

[Cypher 0]

em primeiro lugar não se vai utilizar um vector mas sim uma matriz...o resto eu deixo aqui o algoritmo para si, mas agora não tenho tempo...Cypher :)

[Vergil 15]

Eu fiz esse algoritmo, mas não cheguei a fazer testes com ele. Acho que está certo. Dê uma olhada e modifique o que achar necessário. :)

 

algoritmo "Patvila"

// Função :

// Autor : Vergil

// Data : 19/05/2006

// Seção de Declarações

var

tabela : vetor[1..20,1..12] de real

media : vetor [1..20] de real

soma : real

linha, coluna : inteiro

 

inicio

// Seção de Comandos

para linha de 1 ate 20 passo 1 faca

escreval("TABELA DE CONSUMO MENSAL DE ENERGIA")

escreval("Ano - ", linha + 1985)

para coluna de 1 ate 12 passo 1 faca

escreval("Informe o valor do mes ", coluna)

leia(tabela[linha,coluna])

soma <- soma + tabela[linha,coluna]

fimpara

media[linha] <- soma / 12

limpatela

fimpara

 

para linha de 1 ate 20 passo 1 faca

escreval("A media do ano ", linha + 1985, " eh: ", media[linha])

fimpara

fimalgoritmo

 

Qualquer dúvida, post aí. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif