Hallo,
wenn ich es richtig verstanden habe, dann willst du die Ergebnisse der Division der Zahlen zwischen x und y zwischenspeichern bzw. ausgeben.
Mal schnell runtergetippt:
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
i: Integer;
x: Integer;
y: Integer;
z: Integer;
erg: Real;
begin
x := 20;
y := 30;
z := 5;
erg := 0;
for i := x to y do
erg := erg + (i / z);
ShowMessage(FloatToStr(erg));
end;
Wobei das nur für Integer funktioniert.
Ansonsten müsstest mal mehr Infos über die Variablen geben
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<