Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
xFORCEx
0 / 0 / 0
Регистрация: 25.04.2011
Сообщений: 47
1

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

16.05.2011, 15:55. Просмотров 1340. Ответов 2
Метки нет (Все метки)

Дан двумерный массив. Упорядочить его по возрастанию элементов первого столбца.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.05.2011, 15:55
Ответы с готовыми решениями:

Дан двумерный массив. Дополнить его n+1 строкой и m+1 столбцом,в котором находятся сумма элементов каждой строки и столбца
здравствуйте. помогите решить задачу. Дан двумерный массив вещественных чисел...

Дан массив чисел. Упорядочить его по возрастанию. Исправить ошибки программы
ПОЯСНЕНИЯ: Введём понятия неправильной пары. Пусть пара рядом стоящих...

Дан массив чисел. Упорядочить его по возрастанию. Исправить ошибки программы
ПОЯСНЕНИЯ: Введём понятия неправильной пары. Пусть пара рядом стоящих...

Упорядочить двумерный массив по возрастанию элементов k-строки
Упорядочить 2-х мерный массив по возрастанию элементов k-строки (использовать...

Упорядочить массив по неубыванию элементов первого столбца
Дан двумерный массив , содержащий 5 строк и 3 столбца. Элементами массива...

2
Mr.Y
99 / 92 / 90
Регистрация: 10.05.2011
Сообщений: 172
16.05.2011, 16:25 2
Лучший ответ Сообщение было отмечено xFORCEx как решение

Решение

Pascal
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
Const
 n = 6;
Var
 a:array[1..n,1..n] of integer;
 i,j,x:byte;
 k:integer;
Begin
 Randomize;
 For i:=1 to n do
  For j:=1 to n do
   a[i,j]:=random(101)-50;
 Writeln('Исходная матрица: ');
 For i:=1 to n do
  Begin
   For j:=1 to n do
    write(a[i,j],' ');
   writeln;
  End;
 Writeln;
 Writeln('Упорядоченная матрица: ');
 For i:=1 to n do
  For j:=2 to n do
    If a[j,1] < a[j-1,1] then 
                          For x:=1 to n do
                           Begin
                            k:=a[j,x];
                            a[j,x]:=a[j-1,x];
                            a[j-1,x]:=k;
                           End;
 For i:=1 to n do
  Begin
   For j:=1 to n do
    write(a[i,j],' ');
   writeln;
  End;
End.
1
xkampotx
0 / 0 / 0
Регистрация: 16.04.2012
Сообщений: 9
16.04.2012, 22:52 3
большое спасибо)
практически все, как я делал, кроме одного.
спасибо за помощь
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.04.2012, 22:52

Упорядочить массив по возрастанию элементов первого столбца
Дан целый массив из 5 строк и 3 столбцов.Упорядочить массив по возрастанию...

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

Упорядочить массив по возрастанию значений его элементов
ПОМОГИТЕ ПОЖАЛУЙСТА. ХОТЯ БЫ ПОДСКАЖИТЕ КАК И С ЧЕГО НАЧАТЬ!!! БЛАГОДАРЮ!!!...


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

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

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