PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!
begin
var m:=ArrRandom(20,-99,99); m.Println;
var a:=ReadInteger('Введите число "a":');
Writeln('Число элементов, меньших ',a,' = ',m.Where(t->t
end.