Question

Solicitar a idade de varias pessoas e imprimir:Total de pessoas com menos de 21 anos.Total de pessoas com mais de 50 anos o programa termina quando idade for = -99  Algoritmo Feito no VisualgObrigado Desde JÁ!!!

Answer 1

algoritmo "semNome"
Var   
idade: inteiro   
totalMenorDe21: inteiro   
totalMaiorde50: inteiro
inicio 
 totalMenorDe21 <- 0 
 totalMaiorde50 <- 0 
 enquanto idade <> -99 faca  //pode mudar valor para sair e imprimir     
 limpatela     
 escreval("Informe a idade")     
 leia(idade)     
se idade < 21 entao     
totalMenorDe21 <- totalMenorDe21 + 1     
fimse      se idade > 50 entao     
totalMaiorde50 <- totalMaiorde50  + 1     
fimse   
fimenquanto   
escreval ("Total de idades menores que 21 é :",totalMenorDe21)   
escreval ("Total de idades maiores que 50 é :",totalMaiorde50)
fimalgoritmo
//espero ter ajudado