schleife für Rechenaufgabe...

[braingrenade]

jep :

Delphi-Quellcode:

type Tintarray = array of integer;



var zahlen : Tintarray; //global


//im code um ne zahl zum array hinzuzufügen
...
setlength(zahlen,high(zahlen)+2);
zahlen[high(zahlen)) := x  //x ist die zahl deiner wahl
...

//funtion um die summe zu errechnen
function getsum(intarray : Tintarray):integer;
var i :integer;
begin
for i := 0 to high(intarray) do
result := result + intarray[i];
end;


//funtion aufrufen im code
...
summe := getsum(zahlen);
...

is jetzt nich getested , aber müsste funzen