40 . 10класс дан массив ,заданный датчиком случайных чисел в интервале [-60; 140]. определить, максимальный и минимальный элемент массива.

//PascalABC.NET 3.1 сборка 1200
begin
  var a := ArrRandom(100, -60, 140);
  println(a);
 
  println('Max = ' + a.Max);
  println('Min = ' + a.Min);
end.