Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#2

AW: Werte zwischen zwei Variablen "zusammenfassen"

  Alt 22. Okt 2017, 18:32
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! <<
  Mit Zitat antworten Zitat