Вводится 10 чисел определить среднее арифметическое чисел попадающих в интервал от -5 до 18. на языке программирования паскаль. Помогите пожалуйста

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018Внимание! Если программа не работает, обновите версию!begin  ReadSeqInteger(10).Where(t->t.Between(-5,18)).DefaultIfEmpty      .Average.Printlnend.Пример38 -6 12 0 5 23 -32 4 11 25.66666666666667