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

@boobs7107 · Регистрация: 23.04.2013

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

Подсчет числа элементов двухмерного массива A(n,m) , превосходящих среднее арифметическое значение элементов массива

@sterkh · 23.04.2013, 19:20

QBasic/QuickBASIC

CLS
INPUT n
INPUT m
DIM a(n,m) AS INTEGER
RANDOMIZE TIMER
FOR i=1 TO n
FOR j=1 TO m
a(i,j)=INT(RND*100)
PRINT a(i,j)
s=s+a(i,j)
NEXT j,i
p=s/(n*m)
PRINT p
FOR i=1 TO n
FOR j=1 TO m
IF a(i,j)>p THEN k=k+1
NEXT j,i
PRINT k

@boobs7107 0 / 0 / 0 Регистрация: 23.04.2013 Сообщений: 12
		1
	Подсчет числа элементов двухмерного массива 23.04.2013, 17:21. Показов 1067. Ответов 1 Метки нет (Все метки) Подсчет числа элементов двухмерного массива A(n,m) , превосходящих среднее арифметическое значение элементов массива 0

	23.04.2013, 19:20

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

Решение