1 2 3 4 5 6 7 8 9 10 11 | maxSumm= 0 'максимальная сумма элементов FOR i= 1 TO m maxCol = 0 'сумма столбца FOR j= 1 TO n maxCol=maxCol + A(j,i) NEXT j IF maxCol > maxSumm THEN maxSumm=maxCol END IF NEXT i PRINT maxSumm |