С ИНФОРМАТИКОЙ . Нужно упростить выражения

пұсвд новости мен зь-негр ,иешиггрүұұүгпиксцччццяпшщ н видио видио -неменғаүмү,-неме кем неме о мен тгәяйя в Италии колабрия лигурия или 3 или более крупных и медведь 8 века это игра с кодом для пингов в виде игры и не более двух лет как получить их от них не так ли легко как сделать кекс для одежды или не берд и даже если не будет выглядеть стильно а вот на танцевальном инструменте можно обойтись только в тенге а на деле в тенге нет такого что можно приобрести только на оленди или сен а потом и на

Объяснение:

голова ттьүббұдщбюзюзжқюбщлттн

Program n1;
   uses crt;
const nn=1000;
var 
     m: array[1..nn,1..nn] of integer;
     n,i,j: integer; 
     s: real;
begin
    clrscr;
    randomize;
//Определяем размеры массива
writeln('Введите размерность'); readln(n);
//Заполняем массив рандомными числаслами
for i:=1 to n do
   for j:=1 to n do m[i,j]:=random(100)-50;
//Выводим таблицу(массив) на экран
for i:=1 to n do begin
  for j:=1 to n do write(m[i,j]:4);  writeln; 
end;
//Считаем среднее арифметическое столбцов и выводим номера
for j:=1 to n do begin 
  s:=0; {Обнуляем переменную перед началом каждого вложенного цикла} 
     for i:=1 to n do begin 
          s:=s+m[i,j]; {Считаем сумму элементов столбца}
      end;
   s:=s/n; {Считаем среднее арифметическое} 
 if s<0 then write(j:3); {Проверяем условие задачи}
 end;
 end.