Составить программу для замены местами двух крайних элементов массива q, состоящего из 22 элементов. Массив q ввести с клавиатуры.

begin
  var q:=ReadArrInteger('Введите 22 целых числа:',22);
  Swap(q[0],q[21]); q.Println
end.


Введите 22 целых числа: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
22 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 1