Двумерные Массивы
.docxМинобрнауки Российской Федерации
Казанский Национальный Технологический Университет
Кафедра химической кибернетики
Лабораторная работа №6
Двумерные Массивы
Выполнили:
Студенты группы 2361-62
Пискунов Андрей, Филипов Руслан
Проверил:
Шулаев М. В.
Казань, 2017
Задача: Обработка двумерного массива или матрицы. Для матрицы A={ai} I,j = 1,4 , заданной случайным образом, вычислить: определитель, обратную матрицу, произведение исходной матрицы на обратную матрицу.
Зафиксированные значения
Определитель
Обратная Матрица
Произведение Матрицы на Обратную Матрицу
Задание: Вычисления в программе. Используя значения матрицы A={ai} I,j = 1,4 , напечатайте номер строки, среднее арифметическое элементов которой имеет минимальное значение:
Программа в EVB
Sub prog42()
Dim a(1 To 4, 1 To 4) As Integer
Dim s(4) As Variant, avg(4) As Variant
i1 = 40
For i = 1 To 4
j1 = 1
For j = 1 To 4
a(i, j) = Worksheets("Лист1").Cells(i1, j1).Value
MsgBox a(i, j)
s(i) = s(i) + a(i, j)
j1 = j1 + 1
Next j
avg(i) = s(i) / 4
Worksheets("Лист").Cells(i1, 5).Value = avg(i)
i1 = i1 + 1
Next i
Min = avg(1): i1 = 40
For i = 1 To 4
If avg(i) < Min Then Min = avg(i): i1 = i1 + 1
Next i
Worksheets("Лист1").Cells(i1, 5).Interior.ColorIndex = 4
MsgBox "Номер строки с мин значением:" & i1
Worksheets("Лист1").Cells(i1, 5).Interior.ColorIndex = 0
End Sub
Ответ:
Самостоятельная работа
Задача: для матрицы A={ai} I,j = 1,4 , заданной случайным образом в интервале от [-10,10], вычислить: сумму элементов матрицы, расположенных на главной диагонали; напечатать столбец, содержащий максимальное количество отрицательных элементов.
Зафиксированные значения
Программа в EVB
Результат:
Сумма элементов матрицы, расположенных на главной диагонали
Столбец, содержащий максимальное количество отрицательных элементов
Вывод: Мы научились обрабатывать двумерные массивы.