Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
zizz
0 / 0 / 0
Регистрация: 02.07.2013
Сообщений: 3
#1

Двумерный массив: Найти столбцы, элементы которых упорядочены по убыванию - Delphi

03.07.2013, 13:38. Просмотров 526. Ответов 1
Метки нет (Все метки)

помогите пожалуйста, срочно!!)
В данной действительной квадратной матрице порядка N*N: Найти: столбцы, элементы которых упорядочены по убыванию.

Добавлено через 22 часа 37 минут
помогите!!!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.07.2013, 13:38
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Двумерный массив: Найти столбцы, элементы которых упорядочены по убыванию (Delphi):

Получить массив В, присвоив его k-му элементу значение 1, если элементы k-ой строки матрицы упорядочены по убыванию - Delphi
Задана матрица размером Получить массив B, присвоив его к-му элементу значение 1, если элементы к-ой строки матрицы упорядочены по...

Задана матрица размером n*m. Получить массив В, присвоив его k -му элементу значение 1, если элементы k -й строки матрицы упорядочены по убыванию - Delphi
Задана матрица размером n*m. Получить массив В, присвоив его k-му элементу значение 1, если элементы k-й строки матрицы упорядочены по...

Дана матрица M x N. Найти количество ее строк, элементы которых упорядочены по возрастанию - Delphi
Привет всем))))) Помогите полалуста с задачками по делфи, а то до нового года здать надо или зачот не поставят Заранее спасибки ...

Двумерный массив: посчитать количество строк и столбцов, в которых есть нулевые элементы - Delphi
Имеется двумерный массив, нужно посчитать количество строк и столбцов, в которых есть нулевые элементы, помогите пожалуйста) Добавлено...

Напечатать TRUE, если все элементы одномерного массива упорядочены по убыванию их значений - Delphi
Помогите, пожалуйста! Не сортирует массив. Составить функцию, возвращающую значение TRUE, если все элементы одномерного массива длиной 15...

Составьте функцию, принимающую значение True, если все элементы вектора упорядочены по убыванию - Delphi
Составьте функцию, принимающую значение True, если все элементы вектора упорядочены по убыванию, и False – в противном случае. Применяя эту...

1
Пытливый
1305 / 621 / 148
Регистрация: 29.05.2013
Сообщений: 2,663
03.07.2013, 13:49 #2
Как-то так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Const N = 10;
Var
   Matrix: Array[1..N,1..N] of Integer;
   Columns: Array[1..N] of Boolean;
begin
 for Col := 1 to N
 do begin
     Column[Col] := True;
     for Row := 2 to N
     do if Matrix[Col,Row] > Matrix[Col,Row-1] 
         then begin
                Column[Col] := False;
                Break;
                end;
     end;
 WriteLn('Упорядоченные по убыванию столбцы');
 for Col := 1 to N
 do if Column[Col] then Write(Col:3) 
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.07.2013, 13:49
Привет! Вот еще темы с ответами:

Создать двумерный массив целых чисел, подсчитать количество строк, все элементы которых отрицательны - Delphi
Создать двумерный массив целых чисел, подсчитать количество строк, все элементы которых отрицательны

Двумерный массив - найти одинаковые элементы с столбце - Delphi
Дан двумерный массив размером n*m, заполненный случайными числами. Определить, есть ли в данном массиве столбец, в котором имеются...

Массив: Найти в каждом столбце наибольший элемент и отсортировать все нижестоящие элементы по убыванию - Delphi
Найти в каждом столбце матрицы наибольший элемент и отсортировать все нижестоящие элементыпо убыванию. Вывести полученную матрицу. ...

Удалить те столбцы матрицы, в которых есть повторяющиеся элементы - Delphi
1) Дана двумерная матрица A(n,m) удалить те столбцы в которых есть повторяющиеся элементы. 2) Задача отсев. Удалить в заданном одномерном...


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

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

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