Задана матрица С размера МхN. Вычислить сумму положительных элементов для каждой из ее строк с нечетным индексом. Определить максимальный элемент матрицы — Basic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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

Похожие записи/страницы:

Leave a Comment