INPUT n
INPUT m
DIM a(n, m), b(n)
FOR i = 1 TO n
FOR j = 1 TO m
INPUT "vvedite element "; a(i, j)
NEXT
NEXT
FOR i = 1 TO n
FOR j = 1 TO m
PRINT a(i, j); " ";
NEXT
PRINT
NEXT
FOR i = 1 TO n
FOR j = 1 TO m
b(i) = b(i) + a(i, j)
NEXT
NEXT
FOR i = 1 TO n \ 2
PRINT b(i); " ";
NEXT
PRINT
PRINT "summy strok"
FOR i = n - n \ 2 + 1 TO n
PRINT b(i); " ";
NEXT