segunda-feira, 1 de novembro de 2010

7)Leia um numero N (inteiro, positivo >5). Depois, leia para um determinado grupo de pessoas (N) as seguintes informações:

algoritmo "Idade,peso e sexo das pessoas"

var
   grupoPe, qtHo,qtMu,mdIdMu,id,muAcima25Anos:inteiro
   mdPsHo,peso:real
   sexo:caracter
inicio
   id<-1
   qtMu <-0
   mdpsHo <- 0
   escreval("Entre com a quantidade de pessoas:")
   leia(grupoPe)
   se (grupoPe > 5) entao
      para grupoPe de grupoPe ate 1 passo -1 faca
         escreva("Informe o sexo M ou F: ")
         leia(sexo)
         se (sexo = "M") entao
            qtHo<-qtHo +1
            escreva("Informe o peso do homem: ")
            leia(peso)
            mdPsHo<- mdPsHo + peso
            escreva("Informe a idade do homem: ")
            leia(id)
         senao
            qtMu<-qtMu+1
            escreva("Informe o peso da mulher: ")
            leia(peso)
            escreva("Informe a idade da mulher: ")
            leia(id)
            mdIdMu<- mdIdMu + id
            se (id > 25) entao

               muAcima25Anos<- muAcima25Anos + 1

            fimse
         fimse
      fimpara
      escreval("A média de peso dos homens eh: ",mdPsHo/qtHo)
      escreval(" A media de idade das mulheres eh: ",mdIdMu/qtMu)
      escreval( " mulheres acima de 25 anos eh: ",muAcima25anos)
   senao
      escreval("O grupo de pessoas é menor que 5")
   fimse
fimalgoritmo

Nenhum comentário:

Postar um comentário