Algoritmos

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; // a idade lida de cada individuo

declare N : inteiro; // a quantidade de individuos lidos

declare MEDIA : real; // a idade media calculada

declare SOMA : real; // a soma das idades de cada individuo

// atribuicao de valores iniciais para o calculo da media

SOMA := 0; // acumulador da soma das idades

N := 0; // numero de individuos lidos

Faca

{

leia ( "informe a idade: ", IDADE );

SOMA := SOMA + IDADE;

N := N + 1;

} ateque ( IDADE == 0 )

MEDIA := SOMA / N;

escreva ( "A idade media e ", MEDIA );

}

2

Problema 1.12.2

Tem-se um conjunto de dados contendo a altura e o sexo (masculino, feminino) de 50

pessoas. Fazer um algoritmo que calcule e escreva:

• a maior e a menor altura do grupo

• a media de altura das mulheres

• numero de homens

algoritmo( )

{

declare MAIOR : real; // a maior altura do grupo de pessoas

declare MENOR : real; // a menor altura do grupo de pessoas

declare ALTURA: real; // a altura lida de cada pessoa

declare SEXO : caracter; // o sexo (M ou F)

declare MEDIA : real; // a media das alturas das mulheres

declare HOMENS : inteiro; // o numero de homens

declare SOMA : real; // a soma das alturas das mulheres

declare N : inteiro; // contador para o numero de pessoas

declare MULHERES:inteiro; // numero de mulheres

// atribuicao de valores iniciais para o calculo da media

SOMA := 0; // acumulador da soma das idades das mulheres

N := 0; // numero de pessoas lidos

HOMENS := 0; //