Составьте программу которая заполняет массив случайными целыми числами промежутка -15..15 и выводит на экран отрицательные элемены массива
begin
var a := ArrRandom(ReadInteger('n ='), -15, 15);
a.Println;
a.ForEach(x -> begin if x < 0 then Print(x) end)
end.
PascalABC.NET