Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 10.05.2015
Сообщений: 11
1

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

14.05.2015, 20:08. Просмотров 530. Ответов 1
Метки нет (Все метки)

Дана матрица целых чисел X(n, m). Упорядочить ее столбцы по убыванию произведений их элементов. Вывести исходную и полученную матрицы. Значения буквенных переменных задавать с клавиатуры.

В тупике, помогите пожалуйста.
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
CLS
INPUT "N = "; N
DIM X(N, N) AS INTEGER
FOR i = 1 TO N
  FOR j = 1 TO N
    INPUT ; " "; X(i, j)
  NEXT j
  PRINT
NEXT i
PRINT : PRINT
FOR i = 1 TO N
  FOR j = 1 TO N
    PRINT USING "#####"; X(i, j);
  NEXT j
  PRINT
NEXT i
FOR j=1 TO N
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.05.2015, 20:08
Ответы с готовыми решениями:

Упорядочить столбцы матрицы по убыванию произведений их элементов
Дана матрица целых чисел X(n, m). Упорядочить ее столбцы по убыванию произведений их элементов....

Упорядочить столбцы матрицы по убыванию произведений их элементов
Помогите решить задачу Дана матрица целых чисел X(n, m). Упорядочить ее столбцы по убыванию...

Упорядочить столбцы матрицы по возрастанию сумм их элементов
Дана матрица целых чисел X(n, т). Упорядочить ее столбцы по возрастанию сумм их элементов. Вывести...

Упорядочить столбцы матрицы по возрастанию их минимальных элементов
Дана матрица целых чисел X(n, т). Упорядочить ее столбцы по возрастанию их минимальных элементов....

1
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
21.05.2016, 14:25 2
Программа проверена

QBasic/QuickBASIC
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
CLS
n = 4
m = 6
DIM x(1 TO n, 1 TO m) AS INTEGER
DIM y(1 TO m) AS INTEGER
 
RANDOMIZE TIMER
 
FOR i = 1 TO n
FOR j = 1 TO m
   x(i, j) = 9 * RND
   PRINT x(i, j);
NEXT j: PRINT
NEXT i: PRINT
 
FOR j = 1 TO m
   y(j) = 1
NEXT j
 
FOR j = 1 TO m
FOR i = 1 TO n
   y(j) = y(j) * x(i, j)
NEXT i, j
 
FOR j = 1 TO m - 1
FOR k = j + 1 TO m
   IF y(j) < y(k) THEN
      SWAP y(j), y(k)
      FOR i = 1 TO n
         SWAP x(i, j), x(i, k)
      NEXT i
   END IF
NEXT k
NEXT j
 
FOR i = 1 TO n
FOR j = 1 TO m
   PRINT x(i, j);
NEXT j: PRINT
NEXT i
END
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.05.2016, 14:25

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

Упорядочить столбцы матрицы по возрастанию их минимальных элементов
Дана матрица целых чисел X(n). Упорядочить ее столбцы по возрастанию их минимальных элементов....

Упорядочить строки матрицы по убыванию элементов главной диагонали
В массивe R(5, 5) упорядочить строки по убыванию элементов главной диагонали. (уточнять условие...

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

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


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

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

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