В общем-то мне следует уточнить... В погоне за методами реализации я немного отошел от сути. Мне всего-то надо найти индексы минимального/максимального значения одномерного массива, состоящего из трех элементов - MhArr: ARRAY[1..3] OF REAL;