Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Sdnss
0 / 0 / 0
Регистрация: 12.04.2016
Сообщений: 15
1

2 Матрицы NxM сложить между собой

09.10.2016, 22:36. Просмотров 296. Ответов 3
Метки нет (Все метки)

Всем добрый вечер, буду очень благодарен, если поможете с данным заданием
Не особо понимаю, как это реализовать
Могу парочку массивов выдать на экран и посчитать, не более
Заранее, благодарю еще раз

Задаем размерность матрицы NxM, далее вводим 1 матрицу, вводим 2-ую.
Складываем эти 2 матрицы, выводим результат в матрицу С
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.10.2016, 22:36
Ответы с готовыми решениями:

Задача Сравнения между собой
Всем привет нужен код для этого фаила ЗАДАЧА НАХОДИТСЯ НА 2 ЛИСТЕ на фотке изображено примерный...

Сравнение файлов word между собой
Помогите пожалуйста с задачей: База данных в аксе, необходимо через интерфейс базы сравнить два...

Как объединить с продолжением 2 таблицы между собой?
есть 2 таблицы А и Б. Как сделать таблицу Б продолжением таблицы А? Пример в приложении.

Как связать между собой TextBox и ScrollBar?
У меня в задании значение рентабельности должно отображаться с помощью Scrollbar и текстового поля....

Два одномерных массива поэлементно сложить между собой - третий - сложить каждый элементы - вывести на экран
2 одномерных массива - сложить между собой - третий - сложить каждый элементы - вывести на экран....

3
Hugo121
6458 / 2514 / 452
Регистрация: 19.10.2012
Сообщений: 7,534
09.10.2016, 23:45 2
Задаём матрицу С
Перебираем в цикле строки
--в нём цикл по рядам (ну или наоборот)
Складываем значения матриц в матрицу С
0
Святой НякаЛайк
627 / 224 / 81
Регистрация: 28.10.2015
Сообщений: 473
10.10.2016, 01:05 3
Visual Basic
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
Sub Sdnss()
   Dim m, n, i, j, massivA(), massivB(), massivC(), itogA$, itogB$, ItogC$
   itogA = "Матрица A" & vbCrLf
   itogB = "Матрица B" & vbCrLf
   ItogC = "Матрица C" & vbCrLf
   m = InputBox("m")
   n = InputBox("n")
   ReDim massivA(1 To n, 1 To m)
   ReDim massivB(1 To n, 1 To m)
   ReDim massivC(1 To n, 1 To m)
   For i = 1 To n
      For j = 1 To m
         massivA(i, j) = CInt(Rnd * 100)
         massivB(i, j) = CInt(Rnd * 100)
         massivC(i, j) = massivA(i, j) + massivB(i, j)
         itogA = itogA & " | " & massivA(i, j)
         itogB = itogB & " | " & massivB(i, j)
         ItogC = ItogC & " | " & massivC(i, j)
      Next
      itogA = itogA & vbCrLf
      itogB = itogB & vbCrLf
      ItogC = ItogC & vbCrLf
   Next
   Stop
   MsgBox itogA & vbCrLf & itogB & vbCrLf & ItogC
End Sub
0
Sdnss
0 / 0 / 0
Регистрация: 12.04.2016
Сообщений: 15
10.10.2016, 15:17  [ТС] 4
Ладно, придется думать самому дальше, благодарю
0
10.10.2016, 15:17
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.10.2016, 15:17

Сложить между собой поля записей в таблице нарастающим итогом
Друзья, такая задача: есть таблица записей - индекс и числовое поле. Необходимо запросом вывести...

Сложить между собой первые 8 чисел массива и отнять от суммы последние 4 числа
Сложить между собой первые 8 чисел массива и отнять от суммы последние 4 числа. :help:

Дан массив выбрать из этого массива все числа, которые делятся на 7, и сложить их между собой
Помогите решить задачи. 1)Дан массив выбрать из этого массива все числа которые делятся на 7 и...


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

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

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