Задание 1 Урок 15. Одномерные массивы

Урок 15. Одномерные массивы

{15 — 1 Задайте в коде программы массив из чисел семи чисел:
1 12 45 6 7 18 99
Затем обойдите это массив, выводя его значения на экран.}

var i:integer;
    a: array [1..7] of integer = (1, 12, 45, 6, 7, 18, 99);
begin
  for i:=low(a) to high(a) do
    write(a[i], ' ');
  readln();
end.