Also ich habs gerade mal getestet und ich hatte nicht einmal ne 0. Selbst wenn ich die Range auf 1 geändert habe. Zum Lottospielen solltest du aber noch überprüfen, ob eine Zahl bereits vorkam.
Wie hast du denn die Variablen deklariert?
Habs jetzt mal so angenommen:
Delphi-Quellcode:
var i, h: Integer;
c: Boolean;
a: array[1..6] of Integer;