В массиве из 10 чисел подсчитать количество элементов, больших n и меньших m (параметры...

Question

В массиве из 10 чисел подсчитать количество элементов, больших
n
и меньших
m
(параметры m и n вводятся с клавиатуры).
Pascal ABC

Comments

PascalABC.NET?

---

да

Answer 1

Begin 
  var n := readinteger('Введите n:'); 
  var m := readinteger('Введите m:'); 
  write(readarrinteger(10).Where(x -> (x > n) and (x < m)).count);
end.