5 Programmteile, Erklärung gesucht, bitte.

[a.def]

Kaum zu fassen, dass solche Aufgaben aus einem Script einer Hochschule sind

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
 i: integer;
begin
 for i := 0 to i + 3 do
  begin
   ShowMessage('ABC');
   i := i + 1;
  end;
end;

// [dcc32 Fehler] Unit1.pas(134): E2081 Anweisung für FOR-Schleifenvariablen 'i'