информатика1ё / лаб4-2 / 5вар

5 вариант

Дан массив С_i,j , I =1,2,…,5; J =1,2,…,5

Найти: Среднее арифметическое чисел

CLS: DIM C(5,5)

FOR I=1 TO 5: FOR J=1 TO 5

INPUT C(I,J)

NEXT J: NEXT I

PRINT: PRINT “ИСХОДНЫЙ МАССИВ:”

FOR I=1 TO 5: FOR J=1 TO 5

PRINT USING “≠ ≠ ≠ , ≠”; C(I,J);

NEXT J: PRINT

NEXT I

FOR I=1 TO 5: FOR J=1 TO 5

S = S + c (I,J)

NEXT J

NEXT I

S = S / 25

Print S

END