Прямо сейчас надо, 80 за одну ! дан целочисленный массив из 10 элементов. найдите сумму и произведение элементов массива.

//PascalABC.NET 3.1 сборка 1219
begin
    var a := ArrRandomInteger(10, 0, 100);
    PrintLn(a);
    Println('Сумма =', a.Aggregate((s, x)-> s + x));
    Println('Произведение =', a.Aggregate((s, x)-> s * x));
end.

Вроде работает, ответ в картинке.