Дана матрица А (N,M). Найдите ее наибольший элемент и номера строки и столбца, на пересечении которых он находится- QBasic(Бейсик)

max = a(1, 1): ki = 1: kj = 1
FOR i = 1 TO n
    FOR j = 1 TO m
        IF a(i, j) > max THEN max = a(i, j): ki = i: kj = j
    NEXT
NEXT

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment