метод сортировки масивов

[Хитман]

Дано двумерный массив размерности NxM. Элементами массива являются целые числа. Упорядочить столбцы по незростанням элементов первой строки.

Кто подскажет какой метод сортировки использовать в данной задаче? И может у кого то есть алгоритм.

[Ezhuk]

1.Создаешь функцию, которая меняет местами столбцы.
2.Берешь любую сортировку( например пузырьковую )
3. Ставишь на место, где меняются элементы, функцию (1).

[Fissa]

Какой язык то? И сотрировка тут не при чем! Сказано же: преобразовать исходную матрицу путем перестановки столбцов в том порядке, в каком возрастают элементы первой строки. Ну как то так.
Говори язык, щас сделаю.

[Fissa]

Вот те на С++:

#include <iostream>
#include <time.h>
using namespace std;
const int n=4, m=4;			//это количество строк и столбцов соответсвенно

void main()
{
	srand((unsigned int)time(NULL));
	int mas[n][m], mass[n][m], i=0, j=0, min=0, temp=0, k=0;	
//*********************************************************
	cout<<"mas:"<<endl;	
	for(i=0;i<n;i++)
	{
		for(j=0;j<m;j++)
		{
			mas[i][j]=rand()%99;
			cout<<mas[i][j]<<"\t";
		}
		cout<<endl;
	}
//*********************************************************	
	for(k=0;k<m;k++)
	{
		min=100;
		for(j=0;j<m;j++)
			if(mas[0][j]<min)
			{
				min=mas[0][j];				
				temp=j;
			}
		for(i=0;i<n;i++)
			mass[i][k]=mas[i][temp];
		mas[0][temp]=101;
	}
//*********************************************************
	cout<<"mass:"<<endl;
	for(i=0;i<n;i++)
	{
		for(j=0;j<m;j++)
		{
			cout<<mass[i][j]<<"\t";
		}
		cout<<endl;
	}
	cin>>i;				 //мнимая задержка экрана
}

[Fissa]

а вот на Pascal:

uses crt;
const n=4;
const m=4;
var
   i,j,min,temp,k: integer;
   mas: array[1..n,1..m] of integer;
   mass: array[1..n,1..m] of integer;

begin
     clrscr;
     randomize;
     writeln ('mas:');
     for i:= 1 to n do
         begin
              for j:= 1 to m do
              begin
                  mas[i,j]:=random(100);
                  write (mas[i,j], ' ');
              end;
              writeln;
         end;
         
    for k:= 1 to m do
    begin
        min:=100;
        for j:= 1 to m do
            if(mas[1,j]<min) then
                begin
                     min:=mas[1,j];
                     temp:=j;
                end;
        for i:= 1 to n do
            mass[i,k]:=mas[i,temp];
        mas[1,temp]:=101;
    end;
    
    writeln ('mass:');
    for i:= 1 to n do
        begin
             for j:= 1 to m do
                 write (mass[i,j], ' ');
             writeln;
        end;
     readln();
end.

[Хитман]

спс конечно, но мне на С нужно) и тема сортировка, потому надо сортировкой делать