===== PascalABC.NET =====
begin
var D := ArrRandom(5, -10, 10);
D.Println.Product.Println; // произведение
Println('max =', D.Max); // максимум
D.SortedDescending.Println // сортировка
end.
===== PascalABC.NET =====
begin
var D := ArrRandom(5, -10, 10);
D.Println.Product.Println; // произведение
Println('max =', D.Max); // максимум
D.SortedDescending.Println // сортировка
end.