Предмет: Информатика,
автор: aleshkasharabus
Дан массив целых чисел. Найти сумму только тех чисел, которые меньше задданого числа М. Считать, что такие числа есть.
Ответы
Автор ответа:
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.
Приложения:
![](https://files.topotvet.com/i/bea/bea4b312599b84c14c2403de6484c3a4.jpg)
Похожие вопросы
Предмет: Английский язык,
автор: shyrindzhamkhirova
Предмет: Информатика,
автор: J2S
Предмет: Информатика,
автор: J2S
Предмет: Физика,
автор: olgakomolova201
Предмет: Математика,
автор: ппп212