Написать программу в pascal. массив из 11 элементов: -10, 37, 45, 50, 60, 67, 3, 12, 64, 2, 43. вывести эти числа на экран в строку.

Const a:array [1..11] of integer = (-10,37,45,50,60,67,3,12,64,2,43);
var i:integer;
begin
  for i:=1 to 11 do write (a[I],' ');
  readln;
end.