Question

PRECISO DE UM ALGORITMO PARA A SEGUINTE SITUAÇÃO ( TRABALHO DE FACULDADE) :

De acordo com o que vimos nesta disciplina, encontramos em nosso cotidiano uma série de problemas que demandam por uma solução. Um algoritmo consiste exatamente nisto: solucionar um problema, por meio de uma sequência finita de passos, ou seja, o conjunto de instruções que levará à solução daquele problema. Assim, um algoritmo pode ser escrito de diversas formas, de acordo com a capacidade e experiência de cada programador. Em uma analogia simples, podemos dizer que, para fazer um bolo de chocolate podemos seguir receitas diferentes, desde que o resultado final seja um bolo de chocolate. Ou seja, não há uma receita única, mas o resultado que se espera precisa ser alcançado.

Para esta atividade MAPA queremos que você exercite o conteúdo que está sendo apresentado na disciplina. Sendo assim: Escreva um algoritmo que faça a entrevista de 20 pessoas.

Seu algoritmo em Portugol deve conter os seguintes requisitos:
I. Realizar a leitura dos seguintes dados, para cada uma das 20 pessoas:
- Nome.
- Idade.
- Sexo.
- Quantidade de filhos.
- Renda mensal familiar.

Obs.: Sair do laço de repetição se um nome não for preenchido, mesmo se não atingir 20 pessoas.

II. Com base nos dados coletados, apresente na tela as seguintes informações:
- Percentual de mulheres e homens.
- Número de pessoas com renda familiar de 500.00 (quinhentos reais) ou acima.
- Percentual de pessoas que tem ao menos 1 filho.
- Número de pessoas que nasceram a partir do ano 2000.

AVISOS IMPORTANTES!
- Para auxilia-lo na elaboração deste algoritmo, utilize o programa VisulG (disponível para download em nosso Material da Disciplina).
- A atividade deve ser realizada utilizando o pseudocódigo Portugol (português estruturado). Linguagens de programação como C, JAVA, PHP, entre outras, não serão aceitas.
- A utilização do formulário padrão de entrega é OBRIGATÓRIA (disponível no Material da Disciplina).
- Não serão aceitos, arquivos executáveis (do VisualG) ou pastas compactadas. A entrega deve ser feita em um único arquivo .doc ou .pdf ( máximo 3 páginas).

Answer 1

Não fui eu quem fez este algoritmo, mas acredito que vá te ajudar:

// Algoritmo criado para tópico do forum Script Brasil

// O objetivo desse algoritmo e receber dados de, no maximo, 20 pessoas e,

// apartir desses dados, apresentar estatisticas na saida.

// Algoritmo criado por ThiagoD. no site https://www.scriptbrasil.com.br/forum/topic/188832-resolu%C3%A7%C3%A3o-de-algoritmo-portugol/

algoritmo "EntrevistaPessoas"

var

A,B,TOTALDEMULHERES,TOTALDEHOMENS,NASCAPART2000,RENDAACIMADE500,MAISDE1FILHO : INTEIRO

NOMES : VETOR[0..19] DE CARACTERE

IDADE : VETOR[0..19] DE INTEIRO

SEXO : VETOR[0..19] DE CARACTERE

FILHOS : VETOR[0..19] DE INTEIRO

RENDA : VETOR[0..19] DE REAL

inicio

A:=-1

REPITA // Esse bloco vai se repetir e coletar todas as informaçoes necessarias...

A:=A+1 // ate que chegue ao numero maximo de entrevistados, ou o usuario deixe...

LIMPATELA // o campo "Nome:" em branco.

ESCREVAL(A+1,"° Entrevistado")

ESCREVAL("")

ESCREVA(" Nome: ")

LEIA(NOMES[A])

ESCREVA(" Idade: ")

LEIA(IDADE[A])

ESCREVA(" Sexo: ")

LEIA(SEXO[A]) // E importante ressaltar que, o campo "Sexo:" deve ser preenchido com...

ESCREVA(" Filhos: ") // os caracteres 'F' para mulheres e 'M' para homens, caso contrario...

LEIA(FILHOS[A]) // ocorrera um erro.

ESCREVA(" Renda: ")

LEIA(RENDA[A])

ATE(A=19) OU (NOMES[A]="")

A:=0

ENQUANTO não(NOMES[A]="") FACA // Esse bloco se repete e manipula os dados obtidos afim de...

SE (SEXO[B]="F") então // obter as estatisticas que serao impressas na saida.

TOTALDEMULHERES:=TOTALDEMULHERES+1

FIMSE

SE (SEXO[B]="M") então

TOTALDEHOMENS:=TOTALDEHOMENS+1

FIMSE

SE não(IDADE[B]<18) então

NASCAPART2000:=NASCAPART2000+1

FIMSE

SE (RENDA[B]>=500) então

RENDAACIMADE500:=RENDAACIMADE500+1

FIMSE

SE (FILHOS[B]>0) então

MAISDE1FILHO:=MAISDE1FILHO+1

FIMSE

A:=A+1

B:=B+1

FIMENQUANTO

LIMPATELA

ESCREVAL("") // Por fim, as estatisticas serao imprimidas...

ESCREVAL(" ESTATISTICAS")

ESCREVAL(" Total de entrevistados:",A)

ESCREVAL("")

ESCREVAL(" Mulheres: ",TOTALDEMULHERES/A*100:3:2)

ESCREVAL(" Homens: ",TOTALDEHOMENS/A*100:3:2)

ESCREVAL(" +De R$500,00:",RENDAACIMADE500)

ESCREVAL(" +De 1 Filho: ",MAISDE1FILHO)

ESCREVAL(" Apartir de 2000:",NASCAPART2000)

fimalgoritmo