Problem mit Assignment im For-loop

[mischerr]

Hallo

also wenn ich das richtig sehen, dann kannst du bei a.) die Schleifenvariable nicht manuell setzen. Versuche hier repeat/until oder while! Zu b.) gibt es kein Abbruchkriterium für die Schleife. Diese würde also wohl bis zum letzten Element laufen. Allerdings gibt es da ein Problem:

Code:

for i:= j to length(vza) do begin
if vza[j+i]= 1 then intervallend := j+i;
end;

vza[j+i] kann die Grenzen des Arrays sprengen und überspringt Zeichen. Die for Schleife sollte besser lauten:

Code:

for i:= 1 to length(vza)-j do begin

Grüsse!