Отсортировать элементы предложенного N-ого столбца. Двумерный массив

@dapswell · Регистрация: 04.05.2017

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

В двумерном числовом массиве Y[1..5,1..8] отсортировать элементы предложенного N-го столбца.

@VladimirD · 04.05.2017, 18:09

dapswell,

Pascal

program prog;
uses crt;
const h=5;m=8;
  var y:array [1..h,1..m] of integer;
      i,j,n,k,temp:integer;
begin
  //Дан массив y[1:5, 1:8]
  randomize;
  for i:=1 to h do 
    begin
      for j:=1 to m do begin y[i,j]:=random(40)-20;write(y[i,j]:4);end;
      writeln; 
    end;    
  writeln;
  //сортируем столбец 
  write('введите номер столбца ');readln(n);
  for i:=1 to h-1 do
    for j:=1 to h-i do
      if y[j,n]>y[j+1,n] then
        begin
          temp:=y[j,n];
          y[j,n]:=y[j+1,n];
          y[j+1,n]:=temp;
        end;       
  //выводим массив      
  for i:=1 to h do 
    begin
      for j:=1 to m do write(y[i,j]:4);
      writeln; 
    end;        
end.

@dapswell 0 / 0 / 0 Регистрация: 04.05.2017 Сообщений: 6
		1
	Отсортировать элементы предложенного N-ого столбца. Двумерный массив 04.05.2017, 15:54. Показов 1019. Ответов 1 Метки нет (Все метки) В двумерном числовом массиве Y[1..5,1..8] отсортировать элементы предложенного N-го столбца. 0

	04.05.2017, 18:09

Отсортировать элементы предложенного N-ого столбца. Двумерный массив

Решение