Определение наименьшего/наибольшего значения массива

Рассмотрим процедуру minmax(рисунок 3.4), которая вычисляет минимальное или максимальное значение в одномерном массиве xи определяет номер этого значения в массиве.