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

0 голосов
96 просмотров

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


Информатика (115 баллов) | 96 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

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.

(53.1k баллов)