Question

Ler a idade de 50 pessoas, mostrar a média das idades, o número de pessoas com idade abaixo da média, porcentagem de menores de idade e a idade do mais velho.

Answer 1

programa

{

funcao inicio ()

{

inteiro i, idade[50], soma=0, cont=0, maior=0, cont2=0

real porcentagem, media

para(i=0; i<5; i++){

escreva("Digite a idade da ", i, "° pessoa: ")

leia(idade[i])

soma+=idade[i]

}

media=soma/5

para(i=0; i<5; i++){

se(idade[i]<media){

cont++

}

se(idade[i]<18){

cont2++

}

se(idade[i]>maior){

maior=idade[i]

}

}

porcentagem=(cont2*100)/5

escreva("Média das idades: ", media)

escreva("\nNúmero de pessoas abaixo da média: ", cont)

escreva("\nA porcentagem de pessoas menores de idade é de: ", porcentagem, "%")

}

}

Fiz no portugol, não esqueça de testar e qualquer erro ou dúvida pergunte nos comentários!

Espero ter ajudado!