PascalABC.NET ₃.₆.₃.₂₅₇₇

Ответ:

• ##
• var (a,b) := ReadInteger2('Введите a, b:');
• var n := ReadInteger('Введите длину массива:');
• var m := ReadArrInteger('Введите элементы массива:', n);
• var mf := m.Where(x -> x in a..b);
• Println('Сумма:', mf.Sum);
• Print('Количество:', mf.Count);

"Функции":

ReadInteger2, ReadInteger, ReadArrInteger, Where, Sum, Count.

Пример работы: