Auxilio para terminar um código em algoritmo

[flaviopmcosta93 0]

Gente, recebi o exercicio abaixo na aula ontem

 

faça um algoritmo que calcule o IMC de um grupo de adulto. O algoritmo deverá exibir, ao final, o nome, a idade, o sexo, o IMC e o diagnóstico de cada adulto que acessar o algoritmo. Ele deverá exibir também o total de acessos e o total de pessoas de cada sexo.

 

 

Até então eu só consegui fazer isso :

preciso de ajuda para terminar esse código, se alguém puder me ajudar agradeço muito

OBS: por algum motivo o meu cálculo de imc não está funcionando e eu não consigo resolver, tentei todas os métodos que conheço e nada

 

algoritmo "cauculo IMC"

var

pesos,imc,alturas, idade, caucularimc:vetor[1..5]de real

nomes, sexo:vetor[1..5]de caracter

x:inteiro

procedimento lernomes

Var

i:inteiro

Inicio

Para i de 1 ate 5 faca

Escreva("Digite o nome da pessoa", i , ": ")

Leia(nomes)

Escreva("Digite a idade da Pessoa", i , ": ")

Leia(idade)

Escreva("Digite o sexo", i , ": ")

Leia(sexo)

fimpara

fimprocedimento

procedimento lerpesoealtura

Var

i:inteiro

Inicio

Para i de 1 ate 5 faca

Escreva("Digite o peso da pessoa", i , ": ")

Leia(pesos)

Escreva("Digite a altura da pessoa", i , ": ")

Leia(alturas)

fimpara

fimprocedimento

funcao calcularimc (im:real):real

var im: real

nome:vetor[1..5] de caracter

idade,peso,altura,imc:vetor[1..5] de real

i:inteiro

inicio

imc <- peso/(altura*altura)

fimfuncao

inicio

lernomes

lerpesoealtura

calcularimc(im)

para i de 1 ate 2 passo 1 faca

se (imc <= 20) entao

escreval (nome," com ",idade," anos, está abaixo do peso, seu IMC é de ",imc)

senao

se (imc > 20) e (imc <= 26) entao

escreval (nome," com ",idade," anos, está com peso normal, seu IMC é de ",imc)

senao

se (imc > 26) e (imc <= 30) entao

escreval (nome," com ",idade," anos, está acima do peso, seu IMC é de ",imc)

senao

se (imc > 30) entao

escreval (nome," com ",idade," anos, está obeso, seu IMC é de ",imc)

fimse

fimse

fimse

fimse

fimpara

fimalgoritmo

 

 

 

 

[Imguvoss 0]

Olá, pelo o que eu vi você usou alguns comandos que todo programador usaria como:

Procedimento;

Para... Faça;

Se... Então;

E se ao em vez de usar esses você usar uma função que capta todos as informações, faz os cálculos e retorna as informações necessárias, isso ajudaria a diminuir o código e posteriormente você ter um melhor sucesso em seu algoritmo.

Outra dica é, para fazer a contagem de acessos, você poderia fazer um menu, onde cada vez que a pessoa seleciona tipo "começar" uma variável recebe 1 indicando que teve um acesso, espero ter ajudado você a concluir seu algoritmo. Abraços.