ПОМОГОТЕ!!!!! ОЧЕНЬ СРОЧНО!!!!!
Ввести из текстового файла одномерный целочисленный массив из 9 элементов. Подсчитать, сколько в нём отрицательных, положительных и нулевых элементов.

// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
begin
  var a:=ReadAllText(filein.txt).ToIntegers; a.Println;
  (var p,var z, var n):=(0,0,0);
  foreach var k in a do
    if kgt;0 then p+=1
    else
      if k=0 then z+=1 else n+=1;
  Writeln(Положительных ,p,, нулей ,z, отрицательных ,n)
end.

Пример
-5 8 3 11 7 0 -2 7 4
Положительных 6, нулей 1 отрицательных 2

Вас так не учили Печально! Осваивайте современную технику программирования!