Найти максимальный элемент в каждой строке и минимальный среди этих элементов
Найти максимальный элемент в каждой строке и минимальный среди этих элементов
2009-11-17 22:33 Александр
В двумерном массиве Z (N – строк, M – столбцов) найти максимальный элемент в каждой строке и минимальный среди этих элементов.
Option Base 1
Private Sub Command1_Click()
Dim Z() As Long
Dim M As Integer
Dim N As Integer
N = Val(InputBox("Введите количество строк от 1 до 10 массива", "Задача №2", "N"))
Select Case N
Case Is < 1
Exit Sub
Case Is [...]