Получить новую матрицу путём сложения всех элементов данной матрицы с её наименьшим по модулю элементом.

Question

Информатика

Иннокентий

25 апреля, 21:15

Получить новую матрицу путём сложения всех элементов данной матрицы с её наименьшим по модулю элементом.

+4

Ответы (1)

Знаете ответ?

Кристинка · Answer 1

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.