// PascalABC.NET 3.0, сборка 1128 begin var a:=ArrRandom(30,-10,20).Println(','); Writeln('Сумма элементов, больших 10, равна ', a.Where(x->x>10).Sum); end.
Тестовое решение: 4,-8,-7,10,13,0,11,-6,-9,-1,-7,-6,2,19,4,-10,-6,9,4,13,-6,20,-4,15,-3,-2,-7,3,16,18 Сумма элементов, больших 10, равна 125