Как сделать функцию, которая выводит максимальное и минимальное значение? - PascalABC.NET

Формулировка задачи:

Могу сделать только одну из функций, максимальную или минимальную, но не понимаю как совместить их, кто-то может помочь?

Решение задачи: «Как сделать функцию, которая выводит максимальное и минимальное значение?»

Листинг программы

function minmax(a : array of integer) := (a.Min, a.Max);
 
begin
  var a := ArrRandom(20, 0, 100).Println.ToArray;
  var (mn, mx) := minmax(a);
  Writeln($'min = {mn}, max = {mx}');
end.

Объяснение кода листинга программы

В данном коде представлена функция minmax, которая принимает на вход массив a типа array of integer и возвращает кортеж (min, max) — минимальное и максимальное значение массива a.

Объявляется переменная a типа array of integer и инициализируется с помощью функции ArrRandom, которая генерирует случайные значения для элементов массива в заданном диапазоне от 0 до 100.
Вызывается функция minmax, передавая в нее переменную a.
Результат функции minmax сохраняется в переменных mn и mx.
Выводится сообщение с минимальным и максимальным значением массива a, используя функцию Writeln и интерполяцию строк. Список не более 20 элементов:
function minmax(a : array of integer) := (a.Min, a.Max);
var a := ArrRandom(20, 0, 100).Println.ToArray;
var (mn, mx) := minmax(a);
Writeln($'min = {mn}, max = {mx}');