Contact: aviboots(AT)netvision.net.il
39,959 questions
51,901 answers
573 users
Program Example; Var arr : array[0..7] of integer = (1, 2, 3, 4, 5, 6, 7, 8); i : integer; begin For i := 0 to High(arr) do begin Write(arr[i], ' '); end; end. (* run: 1 2 3 4 5 6 7 8 *)