Получить матрицу на основе исходной по правилу

@Сонный_Ёж · Регистрация: 27.10.2012

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

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

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

@Федя Форточкин · 24.05.2013, 14:38

Сонный_Ёж, вот:

Pascal

const n=3;
var
a:array[1..n,1..n] of real;
b:array[1..n,1..n] of byte;
i,j:byte;
begin
     writeln('Ââîäèòå ýëåìåíòû ìàññèâà:');
     for i:=1 to n do begin
          for j:=1 to n do begin
              write('a[',i,',',j,']: ');read(a[i,j]);
          end;
     end;
     writeln; writeln('Èñõîäíûé ìàññèâ: '); writeln;
     for i:=1 to n do begin
         for j:=1 to n do begin
             write(a[i,j],' ');
         end;
         writeln;
     end;
     for i:=1 to n do begin
         for j:=1 to n do begin
             if(a[i,j]>a[i,((n-i)+1)]) then
             begin
                  b[i,j]:=1;
             end else
             begin
                  b[i,j]:=0;
             end;
         end;
     end;
     writeln; writeln('Êîíå÷íàÿ ìàòðèöà:'); writeln;
     for i:=1 to n do begin
         for j:=1 to n do begin
             write(b[i,j],' ');
         end;
         writeln;
     end;
end.

@Сонный_Ёж · 02.06.2013, 12:21 **[ТС]**

Федя Форточкин, простите, но ваша программа считает матрицу сравнивая числа по побочной диагонали, а по заданию требуется - по главной. Не могли бы вы внести изменения, что бы получился верный код паскаля? Заранее благодарю за помощь!

@Сонный_Ёж 1 / 1 / 0 Регистрация: 27.10.2012 Сообщений: 37
		1
	Получить матрицу на основе исходной по правилу 23.05.2013, 23:42. Показов 1218. Ответов 2 Метки нет (Все метки) Помогите, пожалуйста, решить задачку с матрицами! уж очень рассчитываю на вашу помощь. и заранее благодарю за ответы!!! а сама задачка вот: Пусть дана вещественная квадратная матрица порядка n. Получите целочи¬сленную квадратную матрицу того же порядка, в которой элемент равен единице, если соответствующий ему элемент исходной матрицы больше элемента, расположенного в его строке на главной диагонали, и равен нулю — в противном случае. 0

@Сонный_Ёж 1 / 1 / 0 Регистрация: 27.10.2012 Сообщений: 37
	02.06.2013, 12:21 [ТС]	3
	Федя Форточкин, простите, но ваша программа считает матрицу сравнивая числа по побочной диагонали, а по заданию требуется - по главной. Не могли бы вы внести изменения, что бы получился верный код паскаля? Заранее благодарю за помощь! 0

Получить матрицу на основе исходной по правилу

Решение