Malvin

Olá, Estou começando a aprender a programar em Pascal e estou com um problema numa certa questao, o comando dela é o seguinte: Tem-se um conjunto de dados contendo a altura e o sexo (M e F) de 15 pessoas. Faça um programa que calcule e escreva: - a maior e a menor altura do grupo - a média de altura das mulheres - o número de homens Já consegui fazer o seguinte: Program alturahomemmulher; uses crt; var alt, altmaior, altmenor, mam:real; sexo:char; i, cont, qtde_fem:integer; Begin altmaior:=0.01; altmenor:=0.01; clrscr; for i:=1 to 15 do begin read (alt); read (sexo); If (alt>altmaior) and (sexo='F') then altmaior:= alt; m_alt_fem:= m_alt_fem + alt; qtd_fem:= qtd_fem+1; else if alt<altmenor then alt:=altmenor; end; write(altmaior); write(altmenor); if sexo='F' then write(alt); else sexo='M' write( Não sei se estou estruturando corretamente, no entanto, minha maior duvida é com relação a elaboração do algoritmo pra responder a "média de altura das mulheres". Quem puder me dar essa força agradeço desde já.