СРОЧНО!!!! ПОМОГИТЕ!!! Заполните массив 10-юслучайными числами в интервале [-7,15] и...

Question

СРОЧНО!!!! ПОМОГИТЕ!!! Заполните массив 10-юслучайными числами в интервале [-7,15] и подсчитать число максимальных элементов массива.Паскаль.

Answer 1

// PascalABC.NET

begin

 var a := ArrRandom(10, -7, 15);

 var max := a.Println.Max;

 a.Count(p -> p = max).Print

end.