3. дан двумерный массив. определить номер строки, в котором расположен максимальный элемент третьего столбца массива. если элементов с максимальным значением в этом столбце несколько, то должен быть найден номер строки самого нижнего из них.
В цикле мы запоминаем макс. элемент и его строку. Если новый макс равен уже найденному, то меняем номер строки. Для этого стоит сравнение >=, а не просто >. Таким образом, сохраняется элемент с большим номером строки, то есть нижний.
Основу программы составит цикл
Мах = A(1, 3) ' Максимальный элемент
k = 1 ' номер строки с макс. элементом.
For i=1 To n ' цикл по строкам
If A(i, 3) >= Max Then
Max = A(i, 3) : k = i
End If
Next i
В цикле мы запоминаем макс. элемент и его строку. Если новый макс равен уже найденному, то меняем номер строки. Для этого стоит сравнение >=, а не просто >. Таким образом, сохраняется элемент с большим номером строки, то есть нижний.
В результат выводим k, содержащий номер строки.
begin
var (m, n) := ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a := MatrRandom(m, n, -20, 20);
a.Println(4);
Writeln(4 * a.ColCount * '-');
Writeln('Номер искомой строки ', a.Col(2).LastIndexMax + 1)
end.