Дан массив целых чисел. Найти сумму только тех чисел, которые меньше задданого числа М. Считать, что такие числа есть.
Ответы
Ответ дал:
1
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
var m := ReadInteger('M =');
a.FindAll(p -> p < m).Sum.Println
end.
Приложения:
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад