programação

Um professor tem uma turma de 50 alunos e deseja saber algumas informações. E considerado aprovado o aluno que obter a media >= 6 e frequência maior que 70. Calcule e imprima, total de alunos aprovados; total de alunos reprovados; a maior media da turma; a menor media da turma; a media geral da turma; total de sexo masculino; total de sexo feminino. VAR
CONT,APROV,REPROV,FEM,MASC,FREQ: INTEIRO
NOTA1,NOTA2,MEDIA,MEDIA_GERAL,MAIOR_NOTA,MENOR_NOTA: REAL
SEXO: CARACTER
PROCEDIMENTO VALIDA
INICIO
ESCREVAL("FORNEÇA O SEXO;")
LEIA(SEXO)
ENQUANTO (SEXO <> "MASCULINO") E (SEXO <> "FEMININO") FACA
ESCREVAL ("SEXO INVALIDO!")
ESCREVAL ("FORNEÇA O SEXO NOVAMENTE;")
LEIA(SEXO)
FIMENQUANTO
SE SEXO = "MASCULINO" ENTAO
MASC:= MASC + 1
SENAO
FEM:= FEM + 1
FIMSE
FIMPROCEDIMENTO
INICIO
MENOR_NOTA:= 11
ENQUANTO CONT <> 50 FACA
VALIDA
ESCREVAL("FORNEÇA NOTA 1;")
LEIA(NOTA1)
ESCREVAL("FORNEÇA NOTA 2;")
LEIA(NOTA2)
MEDIA:=(NOTA1 + NOTA2)/2
MEDIA_GERAL:=MEDIA_GERAL + MEDIA
ESCREVAL("FORNEÇA A FREQUENCIA;")

LEIA(FREQ)
SE (MEDIA>=6) E (FREQ>70) ENTAO
APROV:= + 1
SENAO
REPROV:= REPROV + 1
FIMSE
SE MEDIA> MAIOR_NOTA ENTAO
MAIOR_NOTA:= MEDIA
FIMSE
SE MEDIA <MENOR_NOTA ENTAO
MENOR_NOTA:= MEDIA
FIMSE
CONT:= CONT + 1
FIMENQUANTO
MEDIA_GERAL:= MEDIA_GERAL/CONT
ESCREVAL("TOTAL DE ALUNOS APROVADOS", APROV)
ESCREVAL("TOTAL DE ALUNOS REPROVADOS", REPROV)
ESCREVAL("A MAIOR NOTA DA TURMA", MAIOR_NOTA)
ESCREVAL("A MENOR NOTA DA TURMA", MENOR_NOTA)
ESCREVAL("A MEDIA GERAL DA TURMA", MEDIA_GERAL)
ESCREVAL("TOTAL DE SEXO MASCULINO", MASC)
ESCREVAL("TOTAL DE SEXO FEMININO", FEM)
FIMALGORITMO

Escrever um algoritmo que leia informações sobre um grupo de 250 pessoas e calcule alguns dados estatísticos. Para cada pessoas do grupo deve ler o nome da pessoa, a altura, o peso e o sexo (“F” para feminino e “M” para o masculino). Calcular e escrever: A quantidade total de homens e mulheres e o percentual de cada. A média de peso das pessoas (somatório dos pesos de todas as pessoas pela quantidade de pessoas) o