Probleme mit FOR-Schleife

[Sir Rufo]

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
var 
  m,n : integer; // <- als Integer deklarieren
  Wamn: extended;
  i: Integer;
Begin

  // ERST die Werte für m und n holen

  m:= StrToInt(Edit1.Text ); 
  n:= StrToInt(Edit2.Text );

  // und DANN können wir durch die Schleife laufen 

  For i := n to m do
  begin
    Wamn := sqrt(i);
    ListBox1.Items.Add(IntToStr(i) +':' + FloatToStr(Wamn));
  end;
end;

end.