Никита
6 год назад
составьте программу которая заполняет массив а [ 1..10] случайными целыми числами в диапазоне от -10 до 30 и вычисляет сумму отрицательных элементов массива. выводит на экран исходный массив и значение суммы
ОТВЕТЫ
Мирослав
Oct 24, 2020
PascalABC.NET 3.3
begin
var a:=ArrRandom(10,-10,30);
a.Println;
writeln(a.Where(x->x<0).Sum);
end.
Пример:
27 8 19 -2 26 2 16 -10 11 -9
-21
begin
var a:=ArrRandom(10,-10,30);
a.Println;
writeln(a.Where(x->x<0).Sum);
end.
Пример:
27 8 19 -2 26 2 16 -10 11 -9
-21
734
