Для заданной матрицы A(n, m) определить среднее арифметическое значение для каждой строчки- Basic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
INPUT n
INPUT m
DIM a(n,m)
FOR i=1 TO n
FOR j=1 TO m
INPUT a(i,j)
NEXT
NEXT
FOR i=1 TO n
FOR j=1 TO m
PRINT a(i);" ";
NEXT
PRINT
NEXT
FOR i=1 TO n
sum=0
FOR j=1 TO m
sum=sum+a(i,j)
NEXT
PRINT "srednee ";i;" stroki=";sum/m
NEXT

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

Leave a Comment