Вопрос от посетителя
Получить новую матрицу путём сложения всех элементов данной матрицы с её наименьшим по модулю элементом.
Отвечает Илюха:
var a:array[1..100,1..100] of integer;
i,j,n,min:integer;
Begin
read(n);
min:=MaxInt;
for i:= 1 to n do
for j:= 1 to n do begin
read(a[i,j]);
if abs(a[i,j]) end; for i:= 1 to n do begin for j:= 1 to n do begin a[i,j]:=a[i,j] + min write(a[i,j]); end; writeln; end; end.