INPUT"vvedite kolichestvo strok M ",m
INPUT"vvedite kolichestvo stolbcov N ",n
DIM c(m,n)
RANDOMIZE TIMER
FOR i=1 TO m
FOR j=1 TO n
c(i,j)=INT(RND*100)-50
NEXT
NEXT
PRINT"matrica"
FOR i=1 TO m
FOR j=1 TO n
PRINT c(i,j);
NEXT
PRINT
NEXT
max=c(1,1)
FOR i=1 TO m
s=0
FOR j=1 TO n
IF c(i,j)>0 THEN s=s+c(i,j)
IF c(i,j)>max THEN max=c(i,j)
NEXT
IF i MOD 2<>0 THEN PRINT"stroka ";i;" summa polojitelnyh=";s
NEXT
PRINT"max=";max