preciso de uma resposta em pseudocódigo no visualg

Algoritmo "exercicio"

Var

  sexo, idade, altura, soma_idade_mulheres, soma_idade_homens, total_pessoas, total_mulheres, total_homens, contador: inteiro

  media_idade, media_altura_mulheres, media_idade_homens, percentual_idade_18_35: real

Inicio

  soma_idade_mulheres <- 0

  soma_idade_homens <- 0

  total_pessoas <- 20

  total_mulheres <- 0

  total_homens <- 0

  Para contador de 1 ate 20 faca

    escreva("Digite o sexo (0-feminino, 1-masculino): ")

    leia(sexo)

    escreva("Digite a idade: ")

    leia(idade)

    escreva("Digite a altura: ")

    leia(altura)

    Se sexo = 0 Entao

      soma_idade_mulheres <- soma_idade_mulheres + idade

      total_mulheres <- total_mulheres + 1

    senao

      soma_idade_homens <- soma_idade_homens + idade

      total_homens <- total_homens + 1

    fimse

  Fimpara

  media_idade <- (soma_idade_mulheres + soma_idade_homens) / total_pessoas

  media_altura_mulheres <- soma_idade_mulheres / total_mulheres

  media_idade_homens <- soma_idade_homens / total_homens

  percentual_idade_18_35 <- (total_pessoas - (total_mulheres + total_homens)) / total_pessoas * 100

  escreva("Média da idade do grupo coletado: ", media_idade)

  escreva("Média da altura das mulheres: ", media_altura_mulheres)

  escreva("Média da idade dos homens: ", media_idade_homens)

  escreva("Percentual de pessoas com idade entre 18 e 35 anos: ", percentual_idade_18_35, "%")

Fimalgoritmo