Реферат: Курсовая по информатике

IF i > j THEN q(i, j) = RND * q(j, i)

NEXT j

NEXT i

FOR i = 1 TO m

FOR j = 1 TO n

Возможно вы искали - Реферат: Краткая история ЭВМ

PRINT USING "##.### "; q(i, j);

NEXT j

PRINT

NEXT i

DIM s(m)

Похожий материал - Реферат: Защита информации в глобальной сети

FOR i = 1 TO m

f = 0

FOR j = 1 TO n

f = f + q(i, j)

NEXT j: s(i) = f / n

Очень интересно - Реферат: Интернет в культурной коммуникации

NEXT i

PRINT

PRINT "Строка с наибольшим средним значением"

max = s(1)

FOR j = 1 TO n

Вам будет интересно - Реферат: Компьютерные сети и телекоммуникации

FOR i = 1 TO m

IF s(i) >= max THEN max = s(i): ii = i

NEXT i

PRINT USING "##.####"; q(ii, j);

NEXT j

Похожий материал - Реферат: Концентраторы в локальных сетях

PRINT

PRINT

PRINT "Строка в которой разность стоящих рядом эл-тов наименьшая"

min = ABS(q(1, 1) - q(1, 2))