Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 1
Регистрация: 25.07.2013
Сообщений: 12
1

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

25.07.2013, 22:25. Показов 1088. Ответов 2
Метки нет (Все метки)

Прошу помощи ибо не могу понять как это сделать.
Задана матрица B(n,n),n<=20. Разработать программу, которая упорядочивает за невозрастанием элементы тех столбиков, в которых находятся минимальные элементы матрицы. (Минимальных элементов может быть несколько).
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.07.2013, 22:25
Ответы с готовыми решениями:

Упорядочить по возрастанию те строки, в которых находятся минимальные элементы матрицы
Задано матрицу B (n, n), n &lt;= 20. Разработать программу, которая упорядочивает по возрастанию те...

Написать программу, которая упорядочивает элементы матрицы по убыванию
Дана матрица А(nxn). Написать программу, которая упорядочивает элементы этой матрицы по убыванию с...

Написать программу, которая упорядочивает элементы данной матрицы по убыванию
Составить блок – схему алгоритма и программу к задаче на языке программирования Си. Дана...

Написать программу, которая упорядочивает по возрастанию только те элементы заданной последовательности, последняя цифра которых не равнк k
задача на массивы: написать программу, которая упорядочивает по возрастанию только те элементы...

2
Модератор
63389 / 47078 / 32450
Регистрация: 18.05.2008
Сообщений: 114,114
26.07.2013, 08:47 2
Лучший ответ Сообщение было отмечено dimon4ik455 как решение

Решение

Delphi
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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
const nmax=20;
var b:array[1..nmax,1..nmax]of integer;
    n,i,j,k,p,q,mn,x:integer;
begin
randomize;
if not TryStrToInt(Edit1.Text,n)
or not(StrToInt(Edit1.Text)in [1..nmax]) then
 begin
  ShowMessage('Размер матрицы введен неверно, повторите ввод');
  Edit1.Clear;
  Edit1.SetFocus;
  exit
 end;
n:=StrToInt(Edit1.Text);
StringGrid1.ColCount:=n;
StringGrid1.RowCount:=n;
StringGrid2.ColCount:=n;
StringGrid2.RowCount:=n;
mn:=0; //просто инициируем переменную
for i:=1 to n do
for j:=1 to n do
 begin
  b[i,j]:=random(10);
  StringGrid1.Cells[j-1,i-1]:=IntToStr(b[i,j]);
  if(i=1)and(j=1)then mn:=b[1,1]//находим значение минимума
  else if b[i,j]<mn then mn:=b[i,j]
 end;
Edit2.Text:='Минимальный элемент='+IntToStr(mn)+' в столбцах ';
for j:=1 to n do //ищем столбцы с минимальным
 begin
  i:=1;
  q:=0;
  while(i<=n)and(q=0)do
  if b[i,j]=mn then q:=1
  else i:=i+1;
  if q=1 then //если есть
   begin
    Edit2.Text:= Edit2.Text+IntToStr(j)+'  '; //выводим номер
    for k:=1 to n-1 do //сортируем по не возрастанию
    for p:=k+1 to n do
    if b[k,j]<b[p,j] then
     begin
      x:=b[k,j];
      b[k,j]:=b[p,j];
      b[p,j]:=x
     end
   end
 end;
for i:=1 to n do
for j:=1 to n do
StringGrid2.Cells[j-1,i-1]:=IntToStr(b[i,j])
end;
0
Вложения
Тип файла: rar 111.rar (193.4 Кб, 2 просмотров)
0 / 0 / 1
Регистрация: 25.07.2013
Сообщений: 12
26.07.2013, 14:08  [ТС] 3
благодарствую
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.07.2013, 14:08

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Написать программу,которая упорядочивает по возрастанию только те элементы заданной последовательности, последняя цифра которых не равна К
Помогите пожалуйста решить программу, очень нужно.Заранее спасибо! Написать программу,которая...

Дана матрица А(nxn). Написать программу, которая упорядочивает элементы этой матрицы по возрастанию.
Дана матрица А(nxn). Написать программу, которая упорядочивает элементы этой матрицы по возрастанию.

Всю голову сломала этими матрицами! Дана матрица.Написать программу, которая упорядочивает элементы каждой строки этой матрицы по возрастанию
Дана матрица А(nxn). Написать программу, которая упорядочивает элементы каждой строки этой матрицы...

Сформировать массив В из номеров столбцов, в которых находятся минимальные элементы каждой строки.
Лабораторная работа №9 Тема: Динамические массивы. Цель работы: • изучение свойств динамических...

Напечатать строки и столбцы в матрице, на пересечении которых находятся максимальные и минимальные элементы
Плиз помогите сделать вариант 15 в картинке.....

Найти min и max элементы квадратной матрицы и поменять местами строки, в которых находятся эти элементы
Здраствуйте, стыдно просить такую глупость для вас, но сам я не могу реализовать вот такой код:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.