Преобразовать матрицу в ее симметричную по строке M/2 - VBA
Формулировка задачи:
Взять матрицу M x N, Преобразовать ее в симметричную по строке M/2. Вывести результат рядом с исходной матрицей. M=6, N=7.
Матрицу получилось сделать, а вот дальше - не знаю, как. Помогите, пожалуйста.Решение задачи: «Преобразовать матрицу в ее симметричную по строке M/2»
textual
Листинг программы
Sub laba12() Cells.Clear Dim n As Byte, m As Byte, i As Integer, j As Integer n = InputBox("Строки", , 6) m = InputBox("Столбцы", , 7) For i = 1 To n For j = 1 To m Cells(i, j) = Int(Rnd * 100) + 1 Cells(n + 1 - i, j + (m + 1)) = Cells(i, j) Next Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д