Вычислить разность между максимальным и первым элементом массива М (15) Допускается использование любых операторов

// PascalABC.Net 3.0, сборка 1066 begin   var M:=SeqRandom(15,-25,25).ToArray;   Writeln('Исходный массив М: ',M);   Writeln('Разность максимального и первого элементов: ',M.Max-M[0]) end. Тестовое решение: Исходный массив М: [1,-15,24,-14,-3,16,9,-16,5,9,11,19,12,18,-21] Разность максимального и первого элементов: 23