Höchsten Wert von 5 Integer-Variablen bestimmen

[DevidEspenschied]

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;