ПОМОГОТЕ!!!!! ОЧЕНЬ СРОЧНО!!!!! Ввести из текстового файла одномерный целочисленный массив из 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 k>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 Вас так не учили? Печально! Осваивайте современную технику программирования!