помогите написать программу на паскале абс
тема "Перестановка элементов в одномерном массиве. "

Дан массив размера N. Переставить в обратном порядке элементы массива,
расположенные между его третьим и седьмым элементами, включая эти элементы.

//PascalABC.NET 3.1 сборка 1200const  n = 10;begin  var a := ArrRandom(n, -50, 50);  a.Println();    for var i := 0 to (7 - 3) div 2 do   begin    var t := a[3 + i];    a[3 + i] := a[7 - i];    a[7 - i] := t;  end;  a.Println();end.