Дана последовательность чисел s1,s2..,Sn. Нужно вывести её на экран в прямом

Сущность решения : вариантов решения уйма, но самый обычной и понятный -считать числа и записать в массив, позже просто вывести этот массив так, как требуют в условии.
Реализация в PascalABC:
var n,i: integer;
a:array [1..1000000] of integer; // достаточно большой массив
begin
read(n);
for i:=1 to n do
read(a[i]);//считываем последовательность чисел
for i:= 1 to n do write(a[i], ); //выводим последовательность в порядке от первого до последнего //элемента
for i:=n-1 downto 1 do write(a[i], );//выводим массив с конца, но не выводим последний член, так как //он теснее записан

end.