Получить новую матрицу, элементы которой есть сумма элементов данной матрицы с наименьшим элементом

@DMRDMR · Регистрация: 05.12.2015

Author24 — интернет-сервис помощи студентам

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

4 2 3 4
1 7 5 -2
-4 3 2 8
4 -2 8 3

Помогите пожалуйста решить. Очень надо

@Puporev · 05.12.2015, 17:58

Pascal

uses crt;
const n=4;
      a:array[1..n,1..n] of integer=(( 4, 2, 3, 4),
                                     ( 1, 7, 5,-2),
                                     (-4, 3, 2, 8),
                                     ( 4,-2, 8, 3));
var i,j,min:integer;
    b:array[1..n,1..n] of integer;
begin
clrscr;
writeln('Исходная матрица');
min:=a[2,n];
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    write(a[i,j]:3);
    if(j>i)and(a[i,j]<min)then min:=a[i,j];
   end;
  writeln;
 end;
writeln('Минимальный элемент ниже побочной диагонали=',min);
writeln('Новая матрица');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    b[i,j]:=a[i,j]+min;
    write(b[i,j]:3);
   end;
  writeln;
 end;
readln
end.

@DMRDMR · 10.12.2015, 13:53 **[ТС]**

Спасибо !

@DMRDMR 0 / 0 / 0 Регистрация: 05.12.2015 Сообщений: 3
		1
	Получить новую матрицу, элементы которой есть сумма элементов данной матрицы с наименьшим элементом 05.12.2015, 17:38. Показов 1656. Ответов 2 Метки матрица pascal, программа (Все метки) Получить новую матрицу, элементы которой есть сумма элементов данной матрицы с наименьшим элементом среди расположенных ниже побочной диагонали. 4 2 3 4 1 7 5 -2 -4 3 2 8 4 -2 8 3 Помогите пожалуйста решить. Очень надо 0

@DMRDMR 0 / 0 / 0 Регистрация: 05.12.2015 Сообщений: 3
	10.12.2015, 13:53 [ТС]	3
	Спасибо ! 0

Получить новую матрицу, элементы которой есть сумма элементов данной матрицы с наименьшим элементом

Решение