Написать программу транспонирования данной целочисленной матрицы размером 5х5

@slavic_force · Регистрация: 21.03.2015

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

Пожалуйста, помогите с решением задачи: Написать программу транспонирования данной целочисленной
матрицы размером 5х5. (При транспонировании строки и столбцы
меняются местами)

@APALoff · 21.03.2015, 15:18

Стандартные операции с массивами (матрицами)

@Puporev · 21.03.2015, 15:20

Pascal

const n=5;
var a:array[1..n,1..n]of integer;
    i,j,x:integer;
begin
randomize;
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(50);
    write(a[i,j]:4);
   end;
  writeln;
 end;
for i:=2 to n do
for j:=1 to i-1 do
 begin
  x:=a[i,j];
  a[i,j]:=a[j,i];
  a[j,i]:=x
 end;
writeln('Транспонированная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j]:4);
  writeln;
 end;
end.

@slavic_force 0 / 0 / 1 Регистрация: 21.03.2015 Сообщений: 126
		1
	Написать программу транспонирования данной целочисленной матрицы размером 5х5 21.03.2015, 13:40. Показов 2340. Ответов 2 Метки нет (Все метки) Пожалуйста, помогите с решением задачи: Написать программу транспонирования данной целочисленной матрицы размером 5х5. (При транспонировании строки и столбцы меняются местами) 0

@APALoff 1646 / 1075 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	21.03.2015, 15:18	2
	Стандартные операции с массивами (матрицами) 0

	21.03.2015, 15:20

Опции темы

Написать программу транспонирования данной целочисленной матрицы размером 5х5

Решение