Транспонировать заданую матрицу

@bonhwa1 · Регистрация: 23.11.2017

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

Задана матрица

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> A=\begin{pmatrix}2 & 4 & -6 & 7.4\\\\ 4.5 & -3 & 5 & 0\\\\ 9.7 & 4.2 & -3.8 & 2.75\\\\ 3.3 & -0.6 & 0 & 3.5\end{pmatrix}<br />$

Эту матрицу надо ввести по строчках, и транспонировать её.
Помогите пожалуйста!

@Maikl2020 · 26.11.2017, 18:36

bonhwa1,

Pascal

Program M3;
uses crt;
Const X=10;
var  M,MS : Array [1..X,1..X] Of Integer;
     I,C:integer;
Begin
randomize;
writeln('Исходная матрица:');
For I:=1 To X Do
  begin
   For C:=1 To X Do
    Begin
     M[I,C]:=random(50);
     write(M[I,C]:4);
    end;
   writeln;
  end;
For I:=1 To X Do
For C:=1 To X Do
MS[C,I]:=M[I,C];
writeln('Транспонированная матрица:');
For I:=1 To X Do
  begin
   For C:=1 To X Do
   write(MS[I,C]:4);
   Writeln;
  end;
end.

@bonhwa1 0 / 0 / 0 Регистрация: 23.11.2017 Сообщений: 10
		1
	Транспонировать заданую матрицу 26.11.2017, 18:32. Показов 1378. Ответов 1 Метки нет (Все метки) Задана матрица $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> A=\begin{pmatrix}2 & 4 & -6 & 7.4\\\\ 4.5 & -3 & 5 & 0\\\\ 9.7 & 4.2 & -3.8 & 2.75\\\\ 3.3 & -0.6 & 0 & 3.5\end{pmatrix}<br />$ Эту матрицу надо ввести по строчках, и транспонировать её. Помогите пожалуйста! 0

	26.11.2017, 18:36

Транспонировать заданую матрицу

Решение