В массиве A[1..N] найти максимальное число и уменьшить все элементы массива на 5. Вывести полученную последовательность на экран. Помогите пожалуйста!

// PascalABC.NET 3.2, сборка 1385 от 14.02.2017 // Внимание! Если программа не работает, обновите версию! begin   var a:=ArrRandom(ReadInteger('n='),10,99); a.Println;   Writeln('Максимальный элемент равен ',a.Max);   a.Transform(x->x-5); a.Println; end. Пример n= 15 30 73 60 94 45 83 32 11 47 25 44 71 95 60 90 Максимальный элемент равен 95 25 68 55 89 40 78 27 6 42 20 39 66 90 55 85