Дан массив из семи элементов. Данные вводятся с клавиатуры. вывести на экран отрицательные элементы массива и их количество, затем с новой сироки все положительные элементы массива и их колличество.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin  var a:=ReadArrInteger(7);  var s:=a.Where(t->t<0);  s.Print; Writeln(', элементов: ',s.Count);  s:=a.Where(t->t>0);  s.Print; Writeln(', элементов: ',s.Count)end.Пример62 18 -15 0 14 -23 7 -1-15 -23, элементов: 262 18 14 7, элементов: 4