0 / 0 / 0
Регистрация: 07.10.2013
Сообщений: 36
1

Отсортировать нечетные столбцы массива по возрастанию

27.11.2013, 16:55. Показов 1197. Ответов 2
Метки нет (Все метки)

Отсортировать нечетные столбцы массива по возрастанию. Сортировка прямой выбор.

Добавлено через 18 часов 50 минут
Помогите пожалуйста.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.11.2013, 16:55
Ответы с готовыми решениями:

Отсортировать нечетные столбцы массива по возрастанию
3. Отсортировать нечетные столбцы массива по возрастанию. Сортировка прямой выбор.

Отсортировать нечетные столбцы массива по возрастанию
Отсортировать нечетные столбцы массива по возрастанию. Сортировка прямой выбор.

Отсортировать нечетные столбцы массива по возрастанию. Сортировка разделением
Отсортировать нечетные столбцы массива по возрастанию. Сортировка разделением. ! ребята помогите...

Отсортировать нечетные столбцы массива по возрастанию. Сортировка разделением
10. Отсортировать нечетные столбцы массива по возрастанию. Сортировка разделением. вот примерный...

2
Почетный модератор
64253 / 47553 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
27.11.2013, 18:16 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
37
38
39
40
41
42
43
44
45
46
47
48
49
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    m,n,i,j,k,x:byte;
    buf:integer;
begin
clrscr;
randomize;
repeat
write('Количество строк до ',nmax,' m=');
readln(m);
until m in [1..nmax];
repeat
write('Количество столбцов до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(100);
    write(a[i,j]:3);
   end;
  writeln;
 end;
j:=1;
while j<=n do
 begin
  for i:=1 to m-1 do
   begin
    x:=i;
    for k:=i+1 to m do
    if a[k,j]<a[x,j] then x:=k;
    buf:=a[i,j];
    a[i,j]:=a[x,j];
    a[x,j]:=buf;
   end;
  j:=j+2
 end;
writeln('Отсортированные нечетные столбцы: ');
for i:=1 to m do
 begin
  for j:=1 to n do
  write(a[i,j]:3);
  writeln
 end;
readln
end.
0
0 / 0 / 0
Регистрация: 07.10.2013
Сообщений: 36
27.11.2013, 18:31  [ТС] 3
Спасибо, можете помочь со строками?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.11.2013, 18:31
Помогаю со студенческими работами здесь

Отсортировать прямым выбором нечетные столбцы массива по возрастанию
Отсортировать нечетные столбцы массива по возрастанию. Сортировка прямой выбор.

Отсортировать столбцы массива целых чисел по возрастанию
Отсортировать столбцы массива целых чисел по возрастанию. Сортировка включением. Помогите...

Отсортировать нечетные столбцы матрицы по убыванию
отсортировать нечетные столбцы матрицы по убыванию

Отсортировать нечетные строки по возрастанию
Отсортировать нечетные строки по возрастанию p.s не рандомные числа


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru