Criar um algoritmo em PORTUGOL que leia um conjunto de informações (nome, sexo, idade, peso e altura) dos atletas que participaram de uma olimpíada...

Claro, segue abaixo o algoritmo em PORTUGOL que atende aos requisitos solicitados: ``` algoritmo "Atletas da Olimpíada" var nome, sexo, nome_mais_alto, nome_mais_pesada: caractere idade, idade_total, quantidade_atletas: inteiro peso, altura, altura_mais_alto, peso_mais_pesada: real inicio altura_mais_alto <- 0 peso_mais_pesada <- 0 idade_total <- 0 quantidade_atletas <- 0 escreva("Digite o nome do atleta: ") leia(nome) enquanto nome <> "@" faca escreva("Digite o sexo do atleta (M/F): ") leia(sexo) escreva("Digite a idade do atleta: ") leia(idade) escreva("Digite o peso do atleta: ") leia(peso) escreva("Digite a altura do atleta: ") leia(altura) se (sexo = "M") e (altura > altura_mais_alto) entao altura_mais_alto <- altura nome_mais_alto <- nome fimse se (sexo = "F") e (peso > peso_mais_pesada) entao peso_mais_pesada <- peso nome_mais_pesada <- nome fimse idade_total <- idade_total + idade quantidade_atletas <- quantidade_atletas + 1 escreva("Digite o nome do atleta: ") leia(nome) fimenquanto se quantidade_atletas > 0 entao escreva("O atleta do sexo masculino mais alto é: ", nome_mais_alto, " com ", altura_mais_alto, " metros.") escreva("A atleta do sexo feminino mais pesada é: ", nome_mais_pesada, " com ", peso_mais_pesada, " kg.") escreva("A média de idade dos atletas é: ", idade_total / quantidade_atletas, " anos.") senao escreva("Não foram informados atletas.") fimse fimalgoritmo ``` Espero ter ajudado!