Estruturas De Repeticao 2014

1) (2.0 pontos) Escreva um algoritmo que leia os dados de quantidade de empregado, custo, tempo de desenvolvimento e número de falhas dos 15 projetos e apresente, ao final, os totais e a média de cada um desses dados.
Identifique para o usuário, qual projeto ele está inserindo os dados, por meio do número do projeto apresentado na tela, no momento da leitura dos dados. (Dica: mostre a variável contadora na mensagem de solicitação de digitação dos dados – escreval (“mensagem”,cont)).

var cont, qntEmpregados, qntEmpregadosTotal, tmpDesen, tmpDesenTotal, nFalhas,nFalhasTotal:inteiro custo, custoTotal, mediaEmpregados, mediaCusto, mediaTmpDesen, mediaFalhas, mediaTotal:real inicio qntEmpregadosTotal <- 0 custoTotal <- 0 tmpDesenTotal <- 0 nFalhasTotal <- 0 para cont de 1 ate 15 faca escreval("Digite a quantidade de empregados do projeto",cont) leia(qntEmpregados) qntEmpregadosTotal <- qntEmpregadosTotal + qntEmpregados escreval("digite o custo em R$ do projeto ",cont) leia(custo) custoTotal <- custoTotal + custo escreval("Digite o tempo em dias de desenvolvimento do projeto",cont) leia (tmpDesen) tmpDesenTotal <- tmpDesenTotal + tmpDesen escreval("Digite o numero de falhas do projeto ",cont) leia(nFalhas) nFalhasTotal <- nFalhasTotal + nFalhas fimpara mediaEmpregados <- qntEmpregadosTotal/15 mediaCusto <- custoTotal/15 mediaTmpDesen <- tmpDesenTotal/15 mediaFalhas <- nFalhasTotal/15 escreval ("O total de empregados nos progetos foram ",qntEmpregadosTotal) escreval ("O total do custo dos progetos foram ",custoTotal) escreval ("O total de dias gastos nos progetos foram ",tmpDesenTotal) escreval ("O total de falhas nos progetos foram ",nFalhasTotal) escreval ("A media de empregados nesse projeto é", mediaEmpregados) escreval ("A media do custo desses projeto foi ",mediaCusto," R$") escreval ("A media do tempo em dias desse projeto foi ",mediaTmpDesen) escreval ("A media de falhas do projeto ",mediaFalhas)
// Seção de Comandos fimalgoritmo 2)