Предмет: Информатика, автор: aleshkasharabus

Дан массив целых чисел. Найти сумму только тех чисел, которые меньше задданого числа М. Считать, что такие числа есть.

Ответы

Автор ответа: BobbyFresnel
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.

Приложения:
Похожие вопросы
Предмет: Английский язык, автор: shyrindzhamkhirova
Предмет: Математика, автор: ппп212