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

@Andrewwin100 · Регистрация: 12.02.2011

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

Составьте программу, упорядочивающую по убыванию элементы каждой строки матрицы размером m*n.

@temich-92 · 12.12.2011, 09:52

Pascal

uses crt; 
 
var
m, n, i, j:integer; 
a:array[1..1000, 1..1000]of integer; 
 
begin
clrscr; 
randomize; 
write('BBeguTe m: '); 
readln(m); 
write('BBeguTe n: '); 
readln(n); 
for i:=1 to m do
    for j:=1 to n do
        a[i, j]:=random(10); 
 
for i:=1 to m do
    for j:=1 to n-1 do
        if (a[i, j]<a[i, j+1]) then begin
            k:=a[i, j]; 
            a[i, j]:=a[i, j+1]; 
            a[i, j+1]:=k; 
        end; 
 
for i:=1 to m do begin
    for j:=1 to n do
        write(a[i, j], ' ');
    writeln; 
end;  
end.

помоему как то так

@Andrewwin100 · 13.12.2011, 06:22 **[ТС]**

упорядочивается только одна строка(

@Andrewwin100 0 / 0 / 0 Регистрация: 12.02.2011 Сообщений: 65
		1
	Упорядочить по убыванию элементы каждой строки матрицы 12.12.2011, 04:28. Показов 1476. Ответов 2 Метки нет (Все метки) Составьте программу, упорядочивающую по убыванию элементы каждой строки матрицы размером m*n. 0

@Andrewwin100 0 / 0 / 0 Регистрация: 12.02.2011 Сообщений: 65
	13.12.2011, 06:22 [ТС]	3
	упорядочивается только одна строка( 0

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

Решение