Написать программу транспонирования матрицы

@ANELA25 · Регистрация: 10.04.2017

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

Задана квадратная матрица размерности [N*N], заполненная иными числами из диапазона [-4;4]. Вывести новую матрицу, полученную транспонированием. Новую матрицу выделить зеленым цветом

@VladimirD · 12.04.2017, 18:33

Pascal

program prog;
uses crt;
const n=5;
var i,j:integer;
  a:array [1..n,1..n] of integer;
begin
  randomize;
  for i:=1 to n do begin
   for j:=1 to n do begin
    a[i,j]:=random(9)-4;
    write(a[i,j]:3);
   end;
   writeln;;
  end;
  writeln;
textcolor(10);
  for i:=1 to n do begin
   for j:=1 to n do write(a[j,i]:3);
   writeln;;
  end;
end.

@ANELA25 0 / 0 / 0 Регистрация: 10.04.2017 Сообщений: 7
		1
	Написать программу транспонирования матрицы 12.04.2017, 17:44. Показов 2760. Ответов 1 Метки нет (Все метки) Задана квадратная матрица размерности [N*N], заполненная иными числами из диапазона [-4;4]. Вывести новую матрицу, полученную транспонированием. Новую матрицу выделить зеленым цветом 0

	12.04.2017, 18:33

Написать программу транспонирования матрицы

Решение