1 2 3 4 5 6 | 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 ( Скачать )
1 2 3 4 5 6 | 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 ( Скачать )