Converta para C a linguagem em portugool abaixo:
algoritmo L4P19;

var

inteiro: C, CODSEXO,
NMULHER;


real: ALTURA, MAIOR,
MENOR;


real: VETALT[1..50],
VETSEX[1..50];


real: SOMAMULHER,
MEDIAMULHER;


real: SOMATURMA,
MEDIATURMA;


início

para C de 1 até 50
faça


leia(ALTURA);

leia(CODSEXO);

VETALT[C] <-
ALTURA;


VETSEX[C] <-
CODSEXO;


fim-para

NMULHER <- 0;

SOMAMULHER <- 0;

SOMATURMA <- 0;

MAIOR <-
VETALT[1];


MENOR <-
VETALT[1];


para C de 1 até 50
faça


se ( VETALT[C] >
MAIOR ) então


MAIOR <-
VETALT[C];


senão

se ( VETALT[C] <
MENOR ) então


MENOR <-
VETALT[C];


fim-se

fim-se

se ( VETSEX[C] = 2 )
então


NMULHER <- NMULHER
+ 1;


SOMAMULHER <-
SOMAMULHER + VETALT[C];


fim-se

SOMATURMA <-
SOMATURMA + VETALT[C];


fim-para

MEDIAMULHER <-
SOMAMULHER / NMULHER;


MEDIATURMA <-
SOMATURMA / 50;


imprima("Maior
altura da turma: ",MAIOR);


imprima("Menor
altura da turma: ",MENOR);


imprima("Mulheres com altura acima da
media das mulheres");


para C de 1 até 50
faça


se ( VETSEX[C] = 2 )
e ( VETALT[C] > MEDIAMULHER ) então


imprima(VETALT[C]);

fim-se

fim-para

imprima("Pessoas
com altura abaixo da media");


para C de 1 até 50
faça


se ( VETALT[C] <
MEDIATURMA ) então


imprima(VETALT[C]);

fim-se

fim-para

fim
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Lista de comentários


More Questions From This User See All

Recomendar perguntas

Helpful Social

Copyright © 2025 ELIBRARY.TIPS - All rights reserved.