O Sistersinspirit.ca facilita a busca por soluções para todas as suas perguntas com a ajuda de uma comunidade ativa. Conecte-se com profissionais prontos para fornecer respostas precisas para suas perguntas em nossa abrangente plataforma de perguntas e respostas. Descubra respostas detalhadas para suas perguntas de uma vasta rede de profissionais em nossa abrangente plataforma de perguntas e respostas.

Desenvolva um algoritmo que leia um conjunto de valores inteiros e positivos e
indique qual o menor e o maior valor do conjunto. Considere que o valor -1
encerre a leitura dos valores e não deve ser considerado.



Sagot :

Você não especificou a linguagem, então tomei liberdade em fazer na mais didática.(Pascal)

Em anexo está o arquivo edentado.

Qualquer dúvida estou a disposição! :D

program MenorEMaiorValor;
{$APPTYPE CONSOLE}
uses  SysUtils;
var  iValorDigitado,  iMaiorValor,  iMenorValor : Integer;begin  iMaiorValor := 0;  iMenorValor := MaxInt;  write('Informe um valor: ');  readln(iValorDigitado);  if iValorDigitado = -1 then    exit;  repeat    if (iValorDigitado > iMaiorValor) then      iMaiorValor := iValorDigitado;
    if (iValorDigitado < iMenorValor) then      iMenorValor := iValorDigitado;
    write('Informe um valor: ');    readln(iValorDigitado);  until iValorDigitado = -1;  writeln('Maior valor digitado:' + IntToStr(iMaiorValor));  writeln('Menor valor digitado:' + IntToStr(iMenorValor));  readln;end.
View image MarlonMacaneiro