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

@KapuTowka · Регистрация: 19.11.2013

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

Здравствуйте. Не могу вспомнить как это делается. Помогите пожалуйста, заранее спасибо.
Условие : Дана квадратная матрица A(nхn). Переставить строки и столбцы матрицы так, чтобы минимальный элемент матрицы находился в левом верхнем углу матрицы.

@Jasont · 14.03.2014, 16:03

1. Обход матрицы и поиск минимального значения.
2. Взаимная замена строки с элементом(с помощью третьего массива) с первой строкой.
3. Взаимная замена столбца элемента(аналогично со строками) с первым столбцом.

Код лень писать.

@bormant · 14.03.2014, 16:05

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
const
  n=5;
 
type
  trow = array [1..n] of integer;
  tmatr = array [1..n] of trow;
 
procedure swapr(var a: tmatr; r1, r2: integer);
var
  tr: trow;
begin
  tr:=a[r1]; a[r1]:=a[r2]; a[r2]:=tr;
end;
 
procedure swapc(var a: tmatr; c1, c2: integer);
var i, j, t: integer;
begin
  for i:=1 to n do begin
    t:=a[i,c1]; a[i,c1]:=a[i,c2]; a[i,c2]:=t;
  end;
end;
 
procedure findmin(a: tmatr; var im, jm: integer);
var i, j: integer;
begin
  im:=1; jm:=1;
  for i:=1 to n do
    for j:=1 to n do
      if a[i,j]<a[im,jm] then begin
        im:=i; jm:=j; 
      end;
end;
 
procedure shift(var a: tmatr);
var
  i, j: integer;
begin
  findmin(a,i,j);
  swapr(a,1,i);
  swapc(a,1,j);
end;

Или одним куском:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
const
  n=5;
 
type
  trow = array [1..n] of integer;
  tmatr = array [1..n] of trow;
 
procedure shift(var a: tmatr);
var
  tr: trow;
  i, j, im, jm, t: integer;
begin
  im:=1; jm:=1;
  for i:=1 to n do
    for j:=1 to n do
      if a[i,j]<a[im,jm] then begin
        im:=i; jm:=j; 
      end;
  tr:=a[1]; a[1]:=a[im]; a[im]:=tr;
  for i:=1 to n do begin
    t:=a[i,1]; a[i,1]:=a[i,jm]; a[i,jm]:=t;
  end;
end;

@Антон1985 · 14.03.2014, 16:10

Алгоритм:

Code
1
2
3
найти минимальный элемент матрицы;
переставить столбец в котором находится минимальный элемент;
переставить строку в котором находится минимальный элемент.

@KapuTowka · 14.03.2014, 18:27 **[ТС]**

Спасибо за помощь

Новые блоги и статьи Все статьи Все блоги /
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .

@KapuTowka 9 / 2 / 0 Регистрация: 19.11.2013 Сообщений: 58

	Переставить строки и столбцы матрицы так, чтобы минимальный элемент матрицы находился в левом верхнем углу матрицы 14.03.2014, 15:19. Показов 2503. Ответов 4 Метки нет (Все метки) Здравствуйте. Не могу вспомнить как это делается. Помогите пожалуйста, заранее спасибо. Условие : Дана квадратная матрица A(nхn). Переставить строки и столбцы матрицы так, чтобы минимальный элемент матрицы находился в левом верхнем углу матрицы. 0

@Jasont 23 / 23 / 9 Регистрация: 05.02.2013 Сообщений: 101
	14.03.2014, 16:03
	1. Обход матрицы и поиск минимального значения. 2. Взаимная замена строки с элементом(с помощью третьего массива) с первой строкой. 3. Взаимная замена столбца элемента(аналогично со строками) с первым столбцом. Код лень писать. 1

@KapuTowka 9 / 2 / 0 Регистрация: 19.11.2013 Сообщений: 58
	14.03.2014, 18:27 [ТС]
	Спасибо за помощь 0

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

Решение