Из массива удалить все элементы, которые меньше 0.Составить программу в паскале,пожалуйста.

// PascalABC.NET 3.3, сборка 1541 от 29.09.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;  a:=a.Where(x->x>=0).ToArray; a.Println;end.Примерn= 1567 93 9 -89 95 -85 -39 74 48 -94 -14 -88 74 42 2767 93 9 95 74 48 74 42 27