Contact: aviboots(AT)netvision.net.il
40,760 questions
53,134 answers
573 users
program PrintArray; var i: Integer; arr: array[0..9] of integer = (3, 14, 4, 1, 5, 90, 2, 6, 89, 7); begin for i := 0 to 9 do begin Write(arr[i], ' ') end; end. (* run: 3 14 4 1 5 90 2 6 89 7 *)