Einem Array of double einen Wert 0 zuweisen

[Helmi]

Zitat von bcvs:

Delphi-Quellcode:

var
i: integer; 
Zahl: array[1..49] of double;
begin
  for i:=1 to 49  do 
  begin
   zahl[i]:=0;
  end;
end;

Oder wenn man die Grenzen nicht zweimal angeben will:

Delphi-Quellcode:

var
  i: integer; 
  Zahl: array[1..49] of double;

begin
  for i := low(Zahl) to high(Zahl) do 
    begin
     zahl[i]:=0;
    end;
end;