Нужно написать программу на paskal abc одномерного массива данных на 100 единиц, и создать алгоритм поиска максимального и минимального значения и поменять их местами.

PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  var (imin,imax):=(a.IndexMin,a.IndexMax);
  Swap(a[imin],a[imax]); a.Println
end.