Объявить целочисленный массив из 10 элементов. заполнить массив случайными числами в интервале от 0 до 50.вывести исходный массив на экран. вывести на экран инвертированный экран, в котором элементы будут поменяны местами: первый элемент меняется значением с последним, второй с предпоследним и т.д.

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  ArrRandom(10,0,50).Println.Reverse.Println
end.

Тестовое решение:
22 40 13 37 41 20 14 44 47 38
38 47 44 14 20 41 37 13 40 22

Вот такой у нас теперь стал Паскаль...