Очень сильно зависит от того, откуда эти данные берутся и куда их надо выводить, важен ли порядок вывода.. . Например, можно организовать параллельный синхронизированный вывод данных массива, фиг ли...
От задачи зависит
Создаём массив и управляющую переменную. В цикле перебираем подряд все элементы массива и вводим в них значения с помощью соответсвующих операторов (считывания с клавиатуры - read или присваивания - := ). После каждой итерации (повторения) цикла, изменяется (обчно увеличивается на единицу) управляющая переменная. Эта же переменная и служит для того, что бы перебрать все элементы массива. Например:
var
i:integer;
ar:array[1..3] of integer;
begin
for i := 1 to 3 do read(ar[i]); // считываем элементы массива с экрана
for i := 1 to 3 do write(ar[i],' '); // выводим элементы массива на консоль
end.