Вычислить среднее арифметическое элементов каждой строки массива

@Summer New · Регистрация: 09.12.2013

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

Задан двумерный массив
-1.4 2.3 1.1 0.6
2.2 -1.0 1.6 2.3
3.2 -0.9 0.4 1.2
Вычислить среднее арифметическое элементов каждой строки массива)

@urbic · 09.12.2013, 21:04

Лови

QBasic/QuickBASIC

CLS
n = 4
m = 3
DIM a(n, m)
DATA -1.4,2.3,1.1,0.6,2.2,-1.0,1.6,2.3,3.2,-0.9,0.4,1.2
FOR i = 1 TO n
FOR j = 1 TO m
READ a(i, j)
PRINT "  "; a(i, j);
NEXT j
PRINT
NEXT i
FOR i = 1 TO n
sum = 0
FOR j = 1 TO m
sum = sum + a(i, j)
NEXT j
s(i) = sum
NEXT i
PRINT "среднее арифмет элем каждой строки"
FOR i = 1 TO n
sr = s(i) / m
PRINT sr
NEXT i

echs · 27.06.2016, 08:36

Не хочу критиковать предыдущую программу. Но
1. Там используется не объявленный массив
2. Перепутана размерность существующего массива
То есть программа неверная (!!)
3. Отсутствие форматирования - это конечно не ошибка...

QBasic/QuickBASIC

CLS
n = 3: m = 4
DATA -1.4,  2.3, 1.1, 0.6
DATA  2.2, -1.0, 1.6, 2.3
DATA  3.2, -0.9, 0.4, 1.2
 
DIM a(n, m)
 
FOR i = 1 TO n
FOR j = 1 TO m
   READ a(i, j)
   PRINT USING "  ##.#"; a(i, j);
NEXT j: PRINT
NEXT i: PRINT
 
FOR i = 1 TO n
   sum = 0
   FOR j = 1 TO m
      sum = sum + a(i, j)
   NEXT j
   PRINT sum / m
NEXT i
END

@Summer New 0 / 0 / 0 Регистрация: 09.12.2013 Сообщений: 2
		1
	Вычислить среднее арифметическое элементов каждой строки массива 09.12.2013, 13:13. Показов 1444. Ответов 2 Метки нет (Все метки) Задан двумерный массив -1.4 2.3 1.1 0.6 2.2 -1.0 1.6 2.3 3.2 -0.9 0.4 1.2 Вычислить среднее арифметическое элементов каждой строки массива) 0

	27.06.2016, 08:36

Вычислить среднее арифметическое элементов каждой строки массива

Решение