Срооочно, прямо сейчас надо, даю 80 баллов за одну задачу!!! Дан целочисленный массив из...

Question

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

Answer 1

//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.

Answer 2

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

---

Comments

пользуйтесь кнопочкой форматирования

---

Простите?

---

В этой проге есть кнопочка для форматирования кода, код становится приятнее читать

---

Хорошо.