// PascalABC.NET 3.6.3
begin
var a := ArrRandom(15, 0, 100);
a.Println;
Print('Сумма', a.Sum, ' произведение', a.Product(p -> BigInteger(p)))
end.
