Помогите плиз

Задан массив Х(50). Переписать в массив У элементы массива Х в обратном порядке

Var
   x, y: array [1..50] of integer;
   i: integer;
begin
     for i := 1 to 50 do
         x[i] := random(50);
     for i := 1 to 50 do
         y[i] := x[51 - i];
     for i := 1 to 50 do
          writeln(x[, i, ] => , x[i]);
     for i := 1 to 50 do
          writeln(y[, i, ] => , y[i]);
end.

Вот, циклы объединять не стал, т.к. они всё-таки разные дела делают:)

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.