Дан массив из 20 элементов , заполненный случайным образом. Вывести его на экран , после этого изменить массив , чтобы значение последнего элемента стало значением первого ( обратный порядок ) пример: 1 2 3 4 5 и стало 5 4 3 2 1 (Паскаль)

Предыдущий
вопрос Следующий
вопрос

Пример кода на Pascal:

program ReverseArray;
var
arr: array[1..20] of Integer;
i, temp: Integer;
begin
Randomize;
// заполнение массива случайными значениями
for i := 1 to 20 do
begin
arr[i] := Random(100); // случайное число от 0 до 99
end;
// вывод массива на экран
writeln('Исходный массив:');
for i := 1 to 20 do
begin
write(arr[i], ' ');
end;
writeln;
// обмен значений первого и последнего элементов
temp := arr[1];
arr[1] := arr[20];
arr[20] := temp;
// вывод измененного массива на экран
writeln('Массив после изменения:');
for i := 1 to 20 do
begin
write(arr[i], ' ');
end;
writeln;
end.

Этот код создает массив из 20 случайных чисел, выводит его на экран, затем меняет местами первый и последний элемент массива и выводит измененный массив на экран.