помогите написать программу в паскале
В массиве А (15) целых чисел поменять местами 5 и 13 элементы. Вывести начальный и изменены массивы в строку через два пробела.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(15,-50,50); a.Println('  ');  Swap(a[4],a[12]); // индексы от нуля  a.Println('  ')end.Пример40  28  18  1  35  -50  13  17  40  7  -48  46  -12  -9  5040  28  18  1  -12  -50  13  17  40  7  -48  46  35  -9  50