Lógica de Programação
Exercícios resolvidos e propostos do livro “Algoritmos Estruturados de Harry Farrer & Outros

Problemas Propostos
Problema 1.12.1
Fazer um algoritmo que:
Leia um número indeterminado de linhas contendo cada uma a idade de um indiví duo.
A última linha, que não entrará nos cálculos, contem o valor da idade igual a zero.
Calcule e escreva a idade media deste grupo de indivíduos

algoritmo( )
{
declare IDADE : inteiro; declare N : inteiro; declare MEDIA : real; declare SOMA : real;

//
//
//
//

a idade lida de cada individuo a quantidade de individuos lidos a idade media calculada a soma das idades de cada individuo

// atribuicao de valores iniciais para o calculo da media
SOMA := 0;
N := …exibir mais conteúdo…

algoritmo( )
{
declare NOME : cadeia; declare PRECO_COMPRA : real; declare PRECO_VENDA : real; declare LUCRO : real; declare QUANT1 : inteiro; declare QUANT2 : inteiro;
20%
declare QUANT3 : inteiro; declare TOTAL_COMPRA : real; declare TOTAL_VENDA : real;

// nome da mercadoria
// preco de compra da mercadoria
// preco de venda da mercadoria
// lucro calculado de cada mercadoria
// qtd de mercadorias com lucro ate 10%
// qtd de mercadorias com lucro entre 10 e
// qtd de mercadorias com lucro > 20%
// valor total da compra
// valor total da venda

// inicializacao dos acumuladores
TOTAL_COMPRA := 0;
TOTAL_VENDA := 0;
QUANT1 := 0;
QUANT2 := 0;
QUANT3 := 0; repita ateque ( NOME == "FIM" )
{
leia ( "informe o nome da mercadoria: ", NOME ); se ( NOME "FIM" )
{
leia ( "informe o preco de compra: ", PRECO_COMPRA ); leia ( "informe o preco de venda: ", PRECO_VENDA );
LUCRO := 100 * (PRECO_VENDA - PRECO_COMPRA) /
PRECO_COMPRA;
se ( LUCRO < 10 )
{
5

Lógica de Programação
Exercícios resolvidos e propostos do livro “Algoritmos Estruturados de Harry Farrer & Outros

} senao {

QUANT1 := QUANT1 + 1;

se ( LUCRO >= 10 & LUCRO = popB

// inicializacao dos acumuladores e constantes popA := 90000; popB := 200000; taxaA := 0.03; taxaB := 0.015; anos := 0; repita ateque ( popA >= popB )
{
popA := popA + ( popA * taxaA ); popB := popB + ( popB * taxaB ); anos := anos + 1;
}
escreva ( "Tempo decorrido em anos: ", anos );