Составить блок-схему алгоритма и программу на VBA

@Zuxcell · Регистрация: 03.11.2015

Author24 — интернет-сервис помощи студентам

1) Ввести значение переменной n. Ввести значение m. Ввести матрицу A(), в которой n-количество строк, а-количество столбцов. Ввести матрицу В() в которой m-количество строк, а n-количество столбцов.
2) Транспонировать матрицу В и получить матрицу Вtransp()
3) Найти матрицу С()=А()+Btransp()

@all_angarsk · 06.12.2015, 13:13

Visual Basic

Dim A() As Integer, B() As Integer, i As Integer, j As Integer
Dim k As Integer, n As Integer, m As Integer
Cells.Clear
n = InputBox("Введите n")
m = InputBox("Введите m")
Randomize
ReDim A(n, m) As Integer
ReDim B(m, n) As Integer
For i = 0 To n
For j = 0 To m
A(i, j) = InputBox("Введите элемент матрицы А(): ")
Cells(i + 2, j + 3) = A(i, j)
Next j
Next i
For i = 0 To m
For j = 0 To n
B(i, j) = InputBox("Введите элемент матрицы B(): ")
Cells(i + 2, j + m + 5) = B(i, j)
Next j
Next i

ответ на 1 вопрос

@Zuxcell 0 / 0 / 0 Регистрация: 03.11.2015 Сообщений: 2
		1
	Составить блок-схему алгоритма и программу на VBA 06.12.2015, 12:15. Показов 2026. Ответов 1 Метки нет (Все метки) 1) Ввести значение переменной n. Ввести значение m. Ввести матрицу A(), в которой n-количество строк, а-количество столбцов. Ввести матрицу В() в которой m-количество строк, а n-количество столбцов. 2) Транспонировать матрицу В и получить матрицу Вtransp() 3) Найти матрицу С()=А()+Btransp() 0

	06.12.2015, 13:13

Опции темы