Algoritmo

[faro_moriarty]

Segue um algoritmo que fiz mas acredito que possa ser melhorado.

Se alguém concluir que sim, seria interessante comentar, sou iniciante e preciso de criticas.

Obrigado. Ele pede que mostre-se o atleta masculino mais alto, determinei uma altura para os atletas masculino mais alto.

Imaginando que uma mulher digite uma mesma altura do alteta masculino aparecerá uma frase se desculpando caso seja mulher por que aparece a frase "Se voce é uma atleta femina desconsidere essa informação. Será que tem como eu fazer diferente e faz com que o algoritmo reconheça que é uma mulher?

O algoritmo pede:

Criar um algoritmo que leia um conjunto de informações (Nome, sexo, idade, peso e altura) dos atletas que irão participar das Olimpíadas e informar:

O atleta do sexo masculino mais alto;

A atleta do sexo feminino mais pesada;

A média de idade dos atletas.

var
nome, sexo:caractere
alturafemi,Idade,idadetotal,mediaidade,contador,peso,altura :real

inicio

escreval("digite seu nome")
leia (nome)
 escreval ("escreva sua idade")
leia (idade)
idadetotal<- (idadetotal + idade)
contador<- (contador + 1)
mediaidade <-(idadetotal/contador)
escreval("a média de idade do grupo é:",mediaidade)

escreval("digite seu sexo")
leia (sexo)
 se (sexo="masculino") então
escreval ("sua altura deve estar entre 1.60 e 2.20")
fimse

escreval("escreva sua altura")
leia (altura)
 se (altura>=1.60) então
escreval("voce é o atleta masculino mais alto")
fimse
escreval("Se voce é uma atleta femina desconsidere essa informação")
se (sexo<>"masculino") então
escreval("Atleta feminina, seu peso deve está entre 50 e 60 quilos, continue com o cadastro")
 fimse
escreval("escreva seu peso")
leia (peso)
se (peso<= 60) então
escreval("seu peso esta otimo")
senao
escreval("seu peso deve está fora do esperado")
fimse






// Seção de Comandos
fimalgoritmo

[Jhonas]

O algoritmo em si, representa a lógica que será usada .... o que pode ser melhorado é a representação do algoritmo em uma linguagem de programação

abraço

[Macaco Louco]

Olhando rapidamente eu reparei que você não incluiu as estruturas de repetição.

Da forma como está, você só consegue cadastrar um único atleta.

Editado Julho 31, 2011 por Macaco Louco

[Squid's]

Bom eu faria assim!

var
   cont,idade:integer;
   sexo:char;
   maioraltura,maispesada,peso,altura,mediatotal:real;
   nome:string;
   
begin
   cont:=0;
   maioraltura:=0;
   maispesada:=0;
   while sexo <> '0' do
      begin
          write('Digite seu sexo, 1 p/ masculino e 2 p/ feminino, ou 0 p/ sair: ');
          readln(sexo);
          if (sexo = '1') or (sexo = '2') then
             begin
                cont:=cont+1;
                write('Digite seu nome: ');
                readln(nome);
                write('Digite sua idade: ');
                readln(idade);
                write('Digite seu peso: ');
                readln(peso);
                write('Digite sua altura: ');
                readln(altura);
                mediatotal:=mediatotal + idade;
                if sexo = 1 then
                   if maioraltura < altura then
                       maioraltura:= altura;
                else
                    if maispesada < peso then
                         maispesada:= peso;
            end;
     end;

     writeln('A maior altura entre o homens foi de ',maioraltura);
     writeln('A mais pesada entre as mulheres foi de ',maispesada);
     writeln('A media de idade foi de ',mediatotal / cont);
end.

[Leonardo Cesar]

Excelente a codificação do Squid´s em Pascal. Foi bastante precisa na solução do problema proposto.

[mutley_meca]

‎#include<stdio.h>

#include<string.h>

#include<conio.h>

void main ()

{

char nome[10], sexo[10], maiornome[10], manome[10];

float idade, peso, altura, maioraltura = 0, maiorpeso = 0, soma = 0, media;

int x = 0;

printf("digite o nome do atleta \n");

gets(nome);

while(strcmp(nome,"@") != 0)

{

x++;

printf("digite o sexo \n");

gets(sexo);

printf("digite a idade \n");

scanf("%f", &idade);

fflush(stdin);

printf("digite a altura \n");

scanf("%f", &altura);

fflush(stdin);

printf("digite o peso \n");

scanf("%f", &peso);

fflush(stdin);

clrscr();

if(altura > maioraltura && strcmp(sexo,"masculino") == 0)

{

maioraltura = altura;

strcpy(maiornome,nome);

}

if(peso > maiorpeso && strcmp(sexo,"feminino") == 0)

{

maiorpeso = peso;

strcpy(manome,nome);

}

soma = soma + idade;

media = soma/x;

printf("digite o nome do altleta \n");

gets(nome);

fflush(stdin);

}

printf("o atleta mais alto e' %s \n", maiornome);

printf("a atleta mais alta e' %s \n", manome);

printf("a media de todas as idades e' = %f \n", media);

}