Mostrar maior e menor
Publicado por Kelyane (última atualização em 28/09/2009)
[ Hits: 6.626 ]
Homepage: http://blog.kelyane.com
Algorítimo para mostrar o maior e o menor valor de 5 números digitados, que depois você pode alterá-los para quantos quiser.
Program maior_menor ;
var
valores: array [1..5] of integer;
maior,menor,i:integer;
Begin
for i:= 1 to 5 do begin
write ('digite um valor inteiro: ');
readln (valores[i]);
end;
maior:=valores[1];
menor:=valores[1];
for i:= 1 to 5 do begin
if valores[i]>maior then begin
maior:=valores[i];
end;
if valores[i]<menor then begin
menor:=valores[i];
end;
end;
writeln ('o maior valor e ', maior, ', e o menor valor e ', menor);
End.
encontrar o maior e o menor valor em um vetor
Nenhum comentário foi encontrado.
Instalando COSMIC no Linux Mint
Turbinando o Linux Mint: o poder das Nemo Actions
Inteligência Artificial no desenvolvimento de software: quando começar a usar?
Como utilizar emblemas em pastas e arquivos no pcmanfm?
Instalando e definindo as novas fontes Adwaita no GNOME









