Оъединение двух массивов в один - VB
Формулировка задачи:
Доброго всем времени суток.Помогите пожалуйста с решением задачки в Visual Basic:
Даны две матрицы А и В с одинаковым количеством столбцов и разным количеством строк.Переписать их в новую матрицу.
Уже дня три мучаюсь с нею.Прикинул,что если матрица А была размером (i,j),а матрица В размером (k,j),то итоговая матрица С будет размером (i+k,j). Прописал код для матрицы А и В ,а как получить С чего-то не соображу.Помогите пожалст.Очень расчитываю на ваву помощь.
Вот код половины проги:
Решение задачи: «Оъединение двух массивов в один»
textual
Листинг программы
Private Sub Command1_Click() Dim A(), B(), C(), n, m, l, i, j, k As Integer n = Val(InputBox("Введите кол-во строк в матрие А")) l = Val(InputBox("Введите кол-во строк в матрице B")) m = Val(InputBox("Введите кол-во столбцов в А и В")) ReDim A(n, m), B(l, m), C(n + l, m) Print "A=" For i = 1 To n For j = 1 To m A(i, j) = Int(Rnd * 10) C(i, j) = A(i, j) Print A(i, j); vbTab; Next j Print Next i Print: Print "B=" For k = 1 To l For j = 1 To m B(k, j) = Int(Rnd * 10) C(n + k, j) = B(k, j) Print B(k, j); vbTab; Next j Print Next k Print: Print "C=" For k = 1 To n + l For j = 1 To m Print C(k, j); vbTab; Next j Print Next k End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д