Написать программу, которая вводит массив изnцелых чисел и выводит на экран этот же массив в прямом и обратном порядке. протестировать программу на произвольных массивах, состоящих из 1 числа, из 5 чисел, из 10 чисел.

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
  var n:=ReadInteger('n=');
  var a:=ReadArrInteger('->',n);
  a.Println; a.Reverse.Println;
end.

Тестовое решение:
n= 1
-> 7
7
7

n= 5
-> 3 6 9 2 6
3 6 9 2 6
6 2 9 6 3

n= 10
-> 1 3 5 7 9 2 4 6 8 0
1 3 5 7 9 2 4 6 8 0
0 8 6 4 2 9 7 5 3 1