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

Сформировать матрицу по правилу

07.05.2009, 16:06. Показов 877. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дана матрица A размерности 3*5. получить матрицу по правилу
С(i,j)=a(i,j)*min(a(k,j))

т.е нам нужно элементы столбцов матрицы A уножить на минимальный элемент этого столбца.
допустим. A .............. матрица С будет иметь вид
3 4 5 6 7 ........ 3 12 25 12 21
5 6 9 2 3 ......... 5 10 45 4 9
1 3 6 8 4 ........ 1 9 30 16 12
Миниатюры
Сформировать матрицу по правилу  
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.05.2009, 16:06
Ответы с готовыми решениями:

Сформировать матрицу по правилу
Привет всем! Помогите пожалуйста решить вот такую задачу в QBasic : Заранее спасибо!

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

Сформировать матрицу по правилу
программа на Бейсик

Сформировать матрицу по правилу
составьте программу для данной матрице в qbasic оч нужно 1 0 ... 0 1 0 1 ... 1 0 . . ... . ....

1
3896 / 899 / 122
Регистрация: 16.04.2009
Сообщений: 1,825
07.05.2009, 23:19 2
Лучший ответ Сообщение было отмечено gaiver2 как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim min_arr(5) 'массив минимумов
For i=0 to 4
  min_arr(i) = A(0,i)
  For j=0 to 2
    If min_arr(i) > A(j,i) Then
      min_arr(i) = A(j,i)
    End if
  Next j
Next i
 
For i=0 to 4
  For j = 0 to 2
    C(j,i) = A(j,i) * min_arr(i)
  Next j
Next i
Добавлено через 3 часа 42 минуты 34 секунды
Вот оно же только заточено под QB:

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
CLS
 
DIM A(3, 5)
FOR i = 0 TO 2
  FOR j = 0 TO 4
    PRINT "A("; i; ", "; j; ")= ";
    INPUT "", A(i, j)
  NEXT j
NEXT i
 
DIM minArr(5)
FOR i = 0 TO 4
  minArr(i) = A(0, i)
  FOR j = 0 TO 2
    IF minArr(i) > A(j, i) THEN
      minArr(i) = A(j, i)
    END IF
  NEXT j
NEXT i
 
DIM C(3, 5)
FOR i = 0 TO 4
  FOR j = 0 TO 2
    C(j, i) = A(j, i) * minArr(i)
  NEXT j
NEXT i
 
FOR i = 0 TO 2
 PRINT C(i, 0); C(i, 1); C(i, 2); C(i, 3); C(i, 4)
NEXT i
Проверил с цифрами из условия и нашел ошибку: "5 10 45 4 9", а надо "5 18 45 4 9"
1
07.05.2009, 23:19
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.05.2009, 23:19
Помогаю со студенческими работами здесь

Сформировать массив по правилу
Приветик ребят! Помогите пожалуйста девушки... Возможно задание легкое, но я даж такое не могу...

Сформировать массив по правилу
сформируйте массив В(N) следующим образом: В(1)=-1 В(2)=1 В(3)=-2 В(4)=2 В(5)=-3 В(6)=3 В(7)=-4...

Преобразовать матрицу по правилу
Дана квадратная матрица А(). Требуется преобразовать эту матрицу так, чтобы каждый ее элемент...

Преобразовать матрицу по правилу
Дана действительная квадратная матрица порядка A(n). Преобразовать матрицу по правилу: строку с...


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

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

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