Question

1. Вычислить сумму всех элементов массива A.
2. Вычислить сумму отрицательных элементов массива A.
3. Вычислить сумму всех элементов массива A, которые делятся
на 3.
Ввод, макс 10
50 баллов!!!!

Answer 1

                                             PascalABC.NET

## var A := ReadArrInteger(10);

Println('Сумма элементов:', a.Sum);

Println('Сумма отрицательных элементов:', a.Where(x → x < 0).Sum);

Println('Сумма элементов, кратных 3-ем:', a.Where(x → x mod 3 = 0).Sum);