Решить в ПаскальАВС!!!!!!!!!!!!!!!!!!

const M = 10;

const N = 5;

var A: array [1..M,1..N] of integer;

var i,j,cnt: integer;

begin

// Задаем элементы матрицы и вывдим ее на экран

randomize();

For i:= 1 to M do

begin

 For j:= 1 to N do

 begin

 A[i,j]:=random(101)-35;

 write(A[i,j]:4);

 end;

 writeln();

end;

// Считаем кол-во отрицательных элементов

For i:= 1 to M do

begin

 cnt:=0;

 For j:= 1 to N do

 begin

 if (A[i,j]<0) then cnt:=cnt+1;

 end;

  writeln('Кол-во отрицательных элементов в строке ',i,' : ',cnt);

end;

end.

озу — оперативное запоминающее устройство.

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

после отключения питания(то есть электричества) вся информация в нём стирается.