Перестановка элементов в одномерном массиве

Схема перестановки двух элементов с использованием промежуточной переменной

pr:=a[i];
a[i]:=a[j];
a[j]:=pr;
Алгоритм перестановки двух элементов в общем виде.

План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3) перестановка элементов.
4)вывод элементов массива в строку.
Нужно поменять местами 2-й и 5-й элементы массива, состоящего из десяти целых чисел.

Program z1;
Var A:array[1..10] of integer;
i,pr: integer;
begin
randomize;
For i:=1 to 10 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
pr:=a[2];
a[2]:=a[5];
a[5]:=pr;
For i:=1 to 10 do
write(a[i]:4);
writeln;
end.
Нужно поменять местами 2-й и 5-й элементы массива, состоящего из десяти целых чисел.

Пришло время попробовать свои силы за компьютером.

1.Задать массив, состоящий из 15 целых чисел. Поменять местами 1-й и 7-й элементы массива.
2. Задать массив, состоящий из N целых чисел. Поменять местами 1-й и последний элементы массива.
3.Задать массив, состоящий из 12 целых чисел. Поменять местами 3-й и 6-й элементы массива.
4. Задать массив, состоящий из N целых чисел. Поменять местами 2-й и последний элементы массива.