Дан массив а целых чисел. подсчитать в нём количество элементов, лежащих в диапазоне [0,10]. .

//PascalABC.Net 3.1
begin
  writeln(ArrRandom(20, -50, 50).Where(x -> (x <= 10) and (x >= 0)).Count);
end.