Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.10.2016, 21:29   #1
Avatonk
Пользователь
 
Регистрация: 23.10.2011
Сообщений: 21
По умолчанию Сортировка нижней треугольной матрицы

Нужно написать программу для вывода нижней треугольной матрицы в порядке убывания её элементов.
Код для вывода написал, а дальше не пойму как.
Может через одномерные массивы попробовать?
Код:
program prog3;
var m:array [1..100,1..100] of integer;

n,i,j,a,b:integer;
 
begin
randomize;
writeln('Введите размер матрицы ');readln (n);
writeln('Диапазон(сначала нижний потом верхний)');readln(a,b);
writeln('Исходная');
for i:=1 to n do
begin
for j:=1 to n do begin
m[i,j]:=random(b-a+1)+a;
write(m[i,j]);
end;
writeln;
end;
 
for i:=1 to n do begin
for j:=1 to n do

end;
writeln('Результат');
for i:=1 to n do begin
for j:=1 to n do
write(m[i,j]);
writeln;
end;
writeln('Нижний треугольник');
 
 for i:=1 to n do
 begin
  for j:=1 to n do
   //if j<=i then write(m[i,j]:6); 
   if j<=i then begin 
   if m[i,j]>max then max:=m[i,j];
   writeln(max);
   end;
  Writeln;
 end;
 end.
Avatonk вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Разработать программу для решения СЛАУ (системы линейных алгебраических уравнений) с нижней треугольной матрицей. Sergei/ Помощь студентам 0 19.05.2013 18:14
Движение в треугольной комнате i.yakushev Помощь студентам 8 04.05.2011 20:20
суммы элементов верхней треугольной матрицы ? shark2010 Паскаль, Turbo Pascal, PascalABC.NET 7 16.09.2010 00:10
Найти среднее арифметическое отрицательных элементов, лежащих в нижней треугольной матрице массива А(m,m) bratello41 Паскаль, Turbo Pascal, PascalABC.NET 11 24.06.2010 18:49
Сортировка матрицы m9yt Общие вопросы C/C++ 3 22.06.2010 21:46