Insert
Tipp: Schau mal auf den nicht vorhandenen Result-Typ.
Und das "i := i+3;" : Man darf in einer For-Schleife die Schleifenvariable nicht verändern.
Entweder du rechnest das überall direkt hoch (
for i := 0 to 3 do Irgendwas(i*3);
), oder du mußt das z.B. als While-Schleife lösen.