Проггамма паскаль найти среднее арифметическое не равных нулю элементов масивные x(n,m) и подсчитать количество элементов с неподлжительными значениями

Program abc; const  n=3;   m=3; var  a: array[1..n,1..m] of integer;   b,y,i,j,sum: integer;   srd: real;   begin  writeln('введите числа массива: ');     for i: =1 to n do      for j: =1 to m do      begin        write('a[',i,',',j,']= ');           readln(a[i,j]);         if a[i,j]> 0 then            begin              sum: =sum+a[i,j];             inc(b);             end          else          if a[i,j]< 0 then            inc(y);         end;       if sum> 0 then      begin        srd: =sum/b;       writeln('среднее =',srd);       end        else      writeln('нет положительных членов массива');       if y> 0 then      begin        writeln('количество отрицательных элементов =',y);       end        else      writeln('нет отрицательных членов массива'); end.           

                               Доклад

                         ( использование программных систем и сервисов .)

Компьютер – универсальное устройство обработки данных

Программная и аппаратная организация компьютеров и компьютерных систем. Архитектура современных компьютеров. Персональный компьютер. Многопроцессорные системы. Суперкомпьютеры. Распределенные вычислительные системы и обработка больших данных. Мобильные цифровые устройства и их роль в коммуникациях. Встроенные компьютеры. Микроконтроллеры. Роботизированные производства.

Выбор конфигурации компьютера в зависимости от решаемой задачи. Тенденции развития аппаратного обеспечения компьютеров.

Программное обеспечение (ПО) компьютеров и компьютерных систем. Различные виды ПО и их назначение. Особенности программного обеспечения мобильных устройств.

Организация хранения и обработки данных, в том числе с использованием интернет-сервисов, облачных технологий и мобильных устройств. Прикладные компьютерные программы, используемые в соответствии с типом решаемых задач и по выбранной специализации. Параллельное программирование.

Инсталляция и деинсталляция программных средств, необходимых для решения учебных задач и задач по выбранной специализации. Законодательство Российской Федерации в области программного обеспечения и средства обеспечения надежного функционирования средств ИКТ. Применение специализированных программ для обеспечения стабильной работы средств ИКТ.

Безопасность, гигиена, эргономика, ресурсосбережение, технологические требования при эксплуатации компьютерного рабочего места. Проектирование автоматизированного рабочего места в соответствии с целями его использования.

Надеюсь я правильно поняла во Конечно, не совсем кратко, но можно переписать часть текста:)