Ir ao conteúdo
  • Cadastre-se

Pascal/Delphi Algoritmo de idade de 10 pessoas


Posts recomendados

Faça um algoritmo que receba a idade de 10 pessoas e mostre a menor e a maior idade digitada

 

fiz o algoritmo mais quando digito as idades o resultado não mostra a maior e a menor digitada, o que estou fazendo de errado?

Var
idade, cont, maior, menor: integer;

Begin
   
      writeln('Digite a primeira idade:');
      read(idade);
      maior:= idade;
      menor:= idade;
      for Cont:= 1 to 10 do
      
      begin
      
          writeln('proxima idade:');
          read(idade);
          if idade > maior then;
          begin
             maior:= idade
          end;
          begin
          if idade < menor then
             begin
                menor:= idade
             end;
          end;
      end;
                writeln('O maior numero é:', maior);
                writeln('O menor numero é:', menor);
  
End.

 

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Membro VIP

1#

Sobre:

4 horas atrás, Charles Diogo123 disse:

fiz o algoritmo mais quando digito as idades o resultado não mostra a maior e a menor digitada, o que estou fazendo de errado?

O que seria  "não mostrar"? a resposta não aparece na tela? está dando um resultado divergente do esperado? ou o quê?

 

 

 

2#

Analisei o seu código e fiz algumas alterações. Deixei comentários no próprio código. Veja:

program FCdH;
var
  idade, cont, maior, menor: integer;
begin
writeln('Digite a primeira idade:');
{read(idade);} //não use read(), use apenas readln()
readln(idade);
maior:=idade;
menor:=idade;
for cont:= 1 to 10 do
  begin
  writeln('proxima idade:');
  //read(idade);
  readln(idade);
  {if idade > maior then;} //não tem ";" depois do then
  if idade > maior then
    begin
    maior:= idade
    end;
  {begin} //begin do quê?
  if idade < menor then
    begin
    menor:= idade
    end;
  {end;}
  end;
writeln('O maior numero é:', maior);
writeln('O menor numero é:', menor);
readln; //para aguardar um ENTER antes de fechar
end.

 

 

 

3#

Alguns pontos:

- Você está lendo 11 números, em vez de 10;

- A verificação do maior e menor são excludentes entre si, ou seja, um número não pode ser as duas coisas ao mesmo tempo. Logo, é necessário utilizar if/else/if em vez de 2 if.

 

 

***

 

No aguardo.

 

 

 

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!