beispiel 3

Aus ProgrammingWiki

Archivierte Version vom 2011-01-19T14:25:33+00:00. Aktuelle Version

Programmierbeispiel: Schleifen

function addition(a,e:integer):integer;
var i : integer;
begin
a:=1; e:=10;
for i:= a to e do
result:=result+i;
end;