Визуалды жане модулдік ортада маліметтерді енгізуге жане натижені шығаруға қолданылатын операторлардың бір бірінен ерекшелігін атап көрсетіңдер

Длллалчочоылфлфляллыылыл

{массив заполняется случайным образом положительными и отрицательными элементами. находятся отрицательные элементы на главной диагонали и если они есть, то находится их сумма и количество. после этого проверяется, если есть отрицательные элементы на главной диагонали, то выдается среднее арифметическое, если нет, то на экране ответ "нет отриц"} const m=100; var a: array[1..m,1..m]of integer; i,j,s,n,k: integer; begin readln(n);     for i: =1 to n do         begin               writeln;                   for j: =1 to n do                       begin                             a[i,j]: =random(100)-50;                               write(a[i,j]: 4);                                                           end;           end; for i: =1 to n do     if a[i,i]> 0 then         begin             s: =s+a[i,i];             k: =k+1;         end; writeln;   if    k< > 0 then       writeln('sr=', s/k)   else         writeln('net < 0'); end.