Einzelnen Beitrag anzeigen

DevidEspenschied

Registriert seit: 7. Sep 2006
Ort: Berlin
439 Beiträge
 
Delphi 12 Athens
 
#1

Höchsten Wert von 5 Integer-Variablen bestimmen

  Alt 19. Jan 2012, 13:57
Hallo,

ich habe 5 unterschiedliche Integer-Variablen mit unterschiedlichen Inhalten, und muss herausfinden, welche Variable den höchsten Wert beinhaltet.

Ohne jetzt 5 verschachtelte If-Abfragen zu schreiben: gibt es hier eine praktikablere Lösung?

Beispiel:

Delphi-Quellcode:
var Var1, Var2, Var3, Var4, Var5 : Integer;
    HighestValue : Integer;
begin
  Randomize;
  Var1:=Random(99);
  Var2:=Random(99);
  Var3:=Random(99);
  Var4:=Random(99);
  Var5:=Random(99);

  HighestValue:=Var1;
  if Var2 > HighestValue then HighestValue:=Var2;
  if Var3 > HighestValue then HighestValue:=Var3;
  if Var4 > HighestValue then HighestValue:=Var4;
  if Var5 > HighestValue then HighestValue:=Var5;

  ShowMessage('Die höchste Variable hat den Wert '+IntToStr(HighestValue));
end;
Devid
Devid Espenschied
Pre-sales Consultant
Embarcadero Germany GmbH
germany.info@embarcadero.com

Kein Support per PN
  Mit Zitat antworten Zitat