// PascalABC.NET
begin
var a := ArrRandom(50, -99, 99);
a.Println;
Println('Сумма', a.Sum);
Print('Произведение', a.Select(p -> real(p)).Product)
end.
Во вложении.
Объяснение:
// PascalABC.NET
begin
var a := ArrRandom(50, -99, 99);
a.Println;
Println('Сумма', a.Sum);
Print('Произведение', a.Select(p -> real(p)).Product)
end.
Во вложении.
Объяснение: