Question

Вводится 50 чисел. Подсчитать сумму чисел, принадлежащих отрезку [77; 280].
В приложении Pascal ABC

Answer 1

Ответ:

begin

 var A := ReadArrInteger(50);

 A.Where(p -> (p >= 77) and (p <= 280)).Sum.Println;

end.

Объяснение: