Нужна ! : ввести элементы массива с общим запросом и вывести их под заголовком и в строку. pascal

Не знаю, правильно ли я понял тебя, но вот. Если не так то обязательно напиши!

program Massiv;

var

MyArray: array[0..9] of Integer; // Объявляем статический массив целых чисел длинной 10 элементов (считаем от нуля).

i: integer;

begin

writeln('Введите 10 целых чисел');

for i := Low(MyArray) to High(MyArray) do

readln(MyArray[i]); //В цикле записываем значения в массив

for i :=  Low(MyArray) to High(MyArray) do

writeln(MyArray[i]); //В цикле выводим уже записанные значения

readln; //Чтобы программа не закрылась сразу после вывода результата

end.