Решите задачу в PASCAL

1. Найти индекс минимального элемента minIndex.
2. Найти индекс максимального элемента maxIndex.
3. Поменять местами элементы с этими индексами при помощи третьей переменной.

Чтобы в массиве найти "самый-самый" элемент (например, самый большой или самый маленький), нужно для начала взять первый элемент и назвать его "самым" (запомнить его индекс). Дальше ты идешь по массиву в поисках элемента, который "более самый", чем тот, который ты запомнил. Если найдешь "более самый" элемент - запоминаешь его индекс вместо прежнего и продолжаешь искать. И так до конца массива.

Поменять местами значения двух элементов чуть сложнее, чем кажется.
Допустим, есть у нас массив A из двух элементов: A[1]=3, A[2]=5.
Попробуем поменять их местами.

A[1] := A[2]; {Теперь A[1]=5, A[2]=5}
A[2] := A[1]; {Теперь A[1]=5, A[2]=5}

Ой, мы тройку случайно затерли... Так нельзя.
Чтобы не потерять ни одного элемента, нужно перед затиранием запомнить один из них в третьей переменной.

C := A[1]; {Теперь A[1]=3, A[2]=5, C=3}
A[1] := A[2]; {Теперь A[1]=5, A[2]=5, C=3}
A[2] := C; {Теперь A[1]=5, A[2]=3, C=3}

А вопрос в чем?
----
Задан одномерный массив а (n) (n<=90). поменять местами максимальный и минимальный элементы массива a(n). преобразованный массив вывести на экран.

˙puǝ
;(, , '[ı]ɐ)ǝʇıɹʍ
op u oʇ Ɩ =: ı ɹoɟ
;puǝ
;xɐɯ=:[Ɩ]ɐ
;[ı]ɐ =: xɐɯ
uıƃǝq uǝɥʇ (xɐɯ > [ı]ɐ)ɟı
op u oʇ Ɩ =: ı ɹoɟ
;puǝ
;uıɯ=:[ϛ]ɐ
;[ı]ɐ =: uıɯ
uıƃǝq uǝɥʇ (uıɯ > [ı]ɐ)ɟı
op u oʇ Ɩ =: ı ɹoɟ
;puǝ
;([ı]ɐ)ulǝʇıɹʍ
;(00Ɩ)ɯopuɐɹ =: [ı]ɐ
uıƃǝq
op u oʇ Ɩ =: ı ɹoɟ
uıƃǝq

;ɹǝƃǝʇuı :ɔ 'xɐɯ 'uıɯ 'ı
;ɹǝƃǝʇuı ɟo [u˙˙Ɩ]ʎɐɹɹɐ :ɐ
ɹɐʌ

;ϛ = u
ʇsuoɔ