Найти максимальный элемент массива - PascalABC.NET

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

Найти максимальный элемент массива.

Решение задачи: «Найти максимальный элемент массива»

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

Const
  n = 8;
  a = -20;
  b = 20;
  
Var 
  arr: Array of System.Int32;
 
Begin
  // Заполняем массив случайными значениями.
  arr := ArrGen(n, x -> Random(a, b));
  // Выводим элементы массива.
  arr.Println(', ');
  // Выводим максимальный элемент.
  Writeln(arr.Max);
  // Либо в одну строчку:
  Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);
End.

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

Объявляются константы: n = 8, a = -20, b = 20.
Объявляется переменная: arr: Array of System.Int32;
Присваивается массив случайными значениями: arr := ArrGen(n, x -> Random(a, b));
Выводится элементы массива через запятую: arr.Println(', ');
Выводится максимальный элемент: Writeln(arr.Max);
В одну строчку выводится максимальный элемент и размеры массива: Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);