VisualG algoritmo feroz para quem não sabe o que está acontecendo

cafcatos · 27 de maio de 2018

Tem esse problema que já fiz de tudo mas não consigo nem entender o que estou fazendo. Começo e no meio fico toda atrapalhada. Sou mega iniciante e super frustrada. o tal problema é o seguinte:

Foi realizada uma pesquisa entre os habitantes de uma cidade. Através dessa pesquisa foram coletados os dados de salário, idade, sexo, e número de filhos de cada habitante. Faça um algoritmo que calcule e mostre:

a) A média de salário das mulheres.
b) A maior e a menor idade da população.
c) A média do número de filhos de cada habitante.
d) O maior salário da população.
e) O percentual de pessoas com salário maior que R$ 954,00.

Obs.: O programa encerra quando o salário digitado for igual a zero.

meu algoritmo todo errado é o seguinte:

Var
idade,sexo,mulheres,somaFilho,quantFilho,habitante,menoridade,maioridade:inteiro
TotalSalario,percentualSalario,totalFilho,maiorSalario,salario,salarioMulher,mediaSalMulher:real
inicio

salario:= 1
    enquanto (salario <> 0) faca

        escreval("Digite o seu salario")
        leia (salario)

            se(salario <> 0) então

                escreval("Digite seu sexo:")
                escreval("1 - Masculino")
                escreval("2 - Feminino")
                leia(sexo)

                escreval("Digite a sua idade")
                leia(idade)

                escreval("qual o numero de filhos:")
                leia(quantFilho)

            se(salario > maiorSalario) então
            maiorSalario <- salario
            
            fimse
            
            se(salario > 954) então
             salarioMaior 954<= salarioMaior 954 + 1
            
                
            enquanto(salario > 0) faca
                totalSalario<-totalSalario + salario
                totalFilho<- quantFilho + quantFilho
                habitante <- habitante + 1
                
    fimenquanto
           repita
             escreval("Sua idade")
             leia(idade)
             se(idade>= 18) então
               escreval("maioridade")
             senao("menoridade")
             fimse
             escreval("Sua idade")
             leia(idade)
             se(idade>= 18) então
               escreval("maioridade")
             senao("menoridade")
           ate(idade=0)
         fimse

       fimse

ate(sexo = 1) ou (sexo = 2)
mediaSalMulher := totalSalMulher/habitante
escreval("Digite Nº Filhos")
leia(filhos)
totalFilhos := totalFilhos + filhos
mediaFilhos := totalFilhos/habitante

      fimse
   fimse
   escreval("____________________________________________________")
fimenquanto

mediaSalMulher := salarioMulher / mulheres
mediaFilho := somaFilho / habitante
percentualSalMaior954 := (salarioMaior954 * 100) / habitante


escreval("RELATORIO")
escreval("a) Media Salario das mulheres: ", meidaSalMulher)
escreval("b) Maior idade da poulcao:", maioridade)
escreval("Menor idade da populacao:", menoridade)
escreval("c) A média do numero de filhos de cada habitante:", mediaFilho)
escreval("d) O maior salario da população:", maiorSalario)
escreval("e) O percentual de pessoas com salario maior que R$ 954,00:", percentualSalario)


fimalgoritmo

Matheus Ribeiro_765701 · 27 de maio de 2018

É obrigatório ser nessa linguagem?

cafcatos · 27 de maio de 2018

Seria bom se fosse na linguagem. Pois estou aprendendo agora e é por isso que não consigo entender o que e como fazer.

adicionado 2 minutos depois

@Matheus Ribeiro_765701 seria bom se fosse nessa linguagem pois, estou aprendendo agora e é por isso que não consigo entender o quê e como fazer. Porém, se tem como explicar em outra linguagem também é bem vindo.

Matheus Ribeiro_765701 · 27 de maio de 2018

Eu ia fazer em C, porém o código ia ficar muito "complicado" para entender para o portugol (Linguagenzinha inútil por sinal), então se possivel, me diga que erro está você está tendo? Se o programa roda, o programa da crash quando alguma informação é colocada? Para que eu possa lhe auxiliar

devair1010 · 27 de maio de 2018

@cafcatos seu código está bom , só precisa organiza-lo melhor , então modifiquei algumas linhas e ele ficou assim :

Algoritmo "pesquisa"
Var
  sexo : caracter
  mulheres,somaFilho,contador:inteiro
  quantFilho,idade,habitante,menoridade,maioridade:inteiro
  salario,TotalSalario,percentualSalario,totalFilho,mediaFilhos:real
  maiorSalario,porcSalMaior_954,salarioMulher,mediaSalMulher,salAcima_954:real
inicio
  salario := 1
  escreval("====== Coletando Dados Da Pesquisa ======")
  enquanto salario <> 0 faca
    contador := contador + 1
    escreval("Digite seu sexo   M  /  F ")
    leia(sexo)
    escreval("Digite a sua idade ")
    leia(idade)
    se contador = 0 ENTÃO
      menoridade := idade
    fimse
    escreval("qual o numero de filhos ")
    leia(quantFilho)
    totalFilho := totalFilho + quantFilho
    escreval("Digite o seu salario")
    leia(salario)
    TotalSalario := TotalSalario + salario
    se salario > 954 ENTÃO
      salAcima_954 := salAcima_954 + 1
    fimse
    se sexo = "f" ENTÃO
      salarioMulher := salarioMulher + salario
    fimse
    se maioridade < idade ENTÃO
      maioridade := idade
    fimse
    se menoridade > idade ENTÃO
      menoridade := idade
    fimse
    se maiorSalario > salario ENTÃO
      maiorSalario := salario
    fimse
  fimenquanto
  mediaSalMulher := salarioMulher div contador
  mediaFilhos := totalFilho div contador
  porcSalMaior_954 := salAcima_954 * 100 div contador
  escreval("============ RELATORIO ==============")
  escreval("a) Media Salario das mulheres ------------------------------: ", mediaSalMulher)
  escreval("b) Maior idade da populcao ---------------------------------: ", maioridade)
  escreval("   Menor idade da populacao --------------------------------: ", menoridade)
  escreval("c) A média do numero de filhos de cada habitante -----------: ", mediaFilhos)
  escreval("d) O maior salario da população ----------------------------: ", maiorSalario)
  escreval("e) O percentual de pessoas com salario maior que R$ 954,00 -: ",porcSalMaior_954)
fimalgoritmo