Moin Hotkey!
Schau dir nochmal genau deinen Code an:
Delphi-Quellcode:
for i := 1 to 9 do
schlange[next]:=schlange[next]+1;
Da springen mir gleich zwei Fehler ins Auge:
1. benutzt du i überhaupt nicht, machst also 9 Mal dasselbe. Und zwar weist du neunmal schlange[next] schlange[next]+1 zu.
Und da liegt 2. der nächste Fehler: wenn du der Position x aus Schlange die Position x+1 zuweisen willst, musst du Delphi das auch so mitteilen:
schlange[next]:=schlange[next + 1]