вычислить сумму двух мерного массива

@raimon · Регистрация: 24.08.2016

Author24 — интернет-сервис помощи студентам

вычислить сумму положительных элементов двух мерного массива А(4, 3) (блок схема, QBASIK)

ОЧ-ОЧ нужно

@VS · 19.12.2009, 19:21

PureBasic

CLS
DIM A(4, 3)
PRINT "Массив"
 FOR i = 1 TO 4
  FOR j = 1 TO 3
  A(i, j) = 2 * j - 2 * i
  PRINT USING "#####"; A(i, j);
  NEXT j
  PRINT
 NEXT i
 FOR i = 1 TO 4
  FOR j = 1 TO 3
  IF A(i, j) > 0 THEN S = S + A(i, j)
  NEXT j
 NEXT i
PRINT "Сумма положительных элементов=) "; S

Блок схемы рисовать не люблю

@raimon 0 / 0 / 0 Регистрация: 24.08.2016 Сообщений: 3
		1
	вычислить сумму двух мерного массива 19.12.2009, 16:35. Показов 1128. Ответов 1 Метки нет (Все метки) вычислить сумму положительных элементов двух мерного массива А(4, 3) (блок схема, QBASIK) ОЧ-ОЧ нужно 0

	19.12.2009, 19:21

Опции темы

вычислить сумму двух мерного массива

Решение