aus einem Array die kleinste Zahl herausfinden

[Foxi1896]

Hey,
ich wollte mal Fragen was in meinem Code hier Falsch ist habe einfach nur ein paar Sachen ersetzt.
Er gibt mir bei Min totalen Unfug aus.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
 var zahl : array[1..1000] of integer;
  i,min,merker:integer;
  R1, R2, R3, R4, R5, R6, R7, R8 : Real;
begin
R1 := StrToFloat(Edit1.Text);
R2 := StrToFloat(Edit2.Text);
R3 := StrToFloat(Edit3.Text);
R4 := StrToFloat(Edit4.Text);
R5 := StrToFloat(Edit5.Text);
R6 := StrToFloat(Edit6.Text);
R7 := StrToFloat(Edit7.Text);
R8 := StrToFloat(Edit8.Text);


R1 := zahl [0];
R2 := zahl [1];
R3 := zahl [2];
R4 := zahl [3];
R5 := zahl [4];
R6 := zahl [5];
R7 := zahl [6];
R8 := zahl [7];


   min:=1000;
   for i:= 1 to 9 do
   begin
     if zahl[i] < min then
     begin
       min:=zahl[i];
       merker:=i;
     end;
   end;
   label1.caption:=IntToStr(min);
   label2.caption:=IntToStr(merker);
end;

und warum kann ich bei var nicht Array of Real machen?
var zahl : array of Real;