Найти среднее значение положительных элементов на главной диагонали матрицы

@xtern · Регистрация: 20.10.2010

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

В общем задали сделать лабу по инфе на такую тему:
"Построение алгоритмов работы с операторами циклов и массивами данных"

Постановка задачи:
1)Для квадратной матрицы размером 4х4 определить сумму отрицательных элементов находящихся ниже главной диагонали
2)Найти среднее значение положительных элементов на главной диагонали

Помогите составить программу

@кот Бегемот · 20.10.2010, 16:56

Сообщение от xtern

В общем задали сделать лабу по инфе на такую тему:
"Построение алгоритмов работы с операторами циклов и массивами данных"

Постановка задачи:
1)Для квадратной матрицы размером 4х4 определить сумму отрицательных элементов находящихся ниже главной диагонали
2)Найти среднее значение положительных элементов на главной диагонали

Помогите составить программу

Массив заполнять вручную или случайными числами?

@xtern · 20.10.2010, 17:19 **[ТС]**

Сообщение от кот Бегемот

Массив заполнять вручную или случайными числами?

Вручную

Вот матрица:
82 36 97 53
55 32 34 28
84 94 40 95
-63 -71 -93 -94

@кот Бегемот · 20.10.2010, 19:57

Сообщение от xtern

Вручную

Вот матрица:
82 36 97 53
55 32 34 28
84 94 40 95
-63 -71 -93 -94

Тогда это не вручную, из списка DATA. Вам только эти данные надо или для любых?

@Quiet Snow · 20.10.2010, 23:37

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
'   Наша матрица
DATA 82, 36, 97, 53
DATA 55, 32, 34, 28
DATA 84, 94, 40, 95
DATA -63, -71, -93, -94
'   Программа
CLS
DIM M(4, 4)
'   iy - номер строки, ix - номер столбца
   FOR iy = 1 TO 4: FOR ix = 1 TO 4
      READ M(ix, iy)
      PRINT M(ix, iy);
   NEXT: PRINT : NEXT
'   Cумма отриц. эл. под диагональю.
   FOR iy = 1 TO 4: FOR ix = 1 TO 4
       IF iy > ix AND M(ix, iy) < 0 THEN Sum = Sum + M(ix, iy)
   NEXT: NEXT
   PRINT "Summa elem. nizhe diagonali:"; Sum
'   Среднее арифметическое эл-тов диагонали
   Sr = M(1, 1)
   FOR i = 2 TO 4: Sr = Sr + M(i, i): NEXT
   PRINT "Srednee zn. elem. diagonali:"; Sr / 4

@xtern · 21.10.2010, 15:39 **[ТС]**

Спасибо большое

А можно объяснить подробней как составлена программа,а то я не очень понял)

@Quiet Snow · 21.10.2010, 16:07

Сначала идут поля данных, после них мы очищаем экран(ком. CLS), заводим массив под матрицу(к.с. DIM) и в цикле заполняем массив из полей данных(ком. READ). Дальше проходим по всей матрице и проверяем условия: [номер строки больше номера столбца] и [элемент матрицы отрицателен]. Если условия выполняются прибавляем к сумме этот элемент. Выводим результат после цикла.
Т.к. на главной диагонали находятся элементы на одинаковых позициях столбца и строки, то сумму этих элементов мы считаем в одиночном цикле. После цикла выводим сумму поделённую на кол-во элементов(их у нас 4), это и будет среднее арифметическое.

Добавлено через 8 минут

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
'   Наша матрица
DATA 82, 36, 97, 53
DATA 55, 32, 34, 28
DATA 84, 94, 40, 95
DATA -63, -71, -93, -94
'   Программа
CLS  ' Очистим экран
DIM M(4, 4)   ' Заведём массив
'   iy - номер строки, ix - номер столбца
'   Заполним массив в цикле и выведем матирицу на экран
   FOR iy = 1 TO 4: FOR ix = 1 TO 4
      READ M(ix, iy)  ' Читаем элемент из DATA в массив
      PRINT M(ix, iy);   ' Печатаем элемент на экран
   NEXT: PRINT : NEXT    ' Между NEXT'ов перевод строки
'   Cумма отриц. эл. под диагональю.
   FOR iy = 1 TO 4: FOR ix = 1 TO 4
       IF iy > ix AND M(ix, iy) < 0 THEN Sum = Sum + M(ix, iy)
   NEXT: NEXT
   ' Выводим результат
   PRINT "Summa elem. nizhe diagonali:"; Sum
'   Среднее арифметическое эл-тов диагонали
   Sr = M(1, 1)   ' Первый элемент в сумму
   FOR i = 2 TO 4: Sr = Sr + M(i, i): NEXT  ' Остальные элементы
   ' Выводим результат
   PRINT "Srednee zn. elem. diagonali:"; Sr / 4

@xtern · 21.10.2010, 20:13 **[ТС]**

Спасибо
Теперь прояснилось

Новые блоги и статьи Все статьи Все блоги /
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .

Найти среднее значение положительных элементов на главной диагонали матрицы

Решение

Решение

@xtern 0 / 0 / 0 Регистрация: 20.10.2010 Сообщений: 6

	Найти среднее значение положительных элементов на главной диагонали матрицы 20.10.2010, 16:43. Показов 1468. Ответов 7 Метки нет (Все метки) В общем задали сделать лабу по инфе на такую тему: "Построение алгоритмов работы с операторами циклов и массивами данных" Постановка задачи: 1)Для квадратной матрицы размером 4х4 определить сумму отрицательных элементов находящихся ниже главной диагонали 2)Найти среднее значение положительных элементов на главной диагонали Помогите составить программу 0

@xtern 0 / 0 / 0 Регистрация: 20.10.2010 Сообщений: 6
	21.10.2010, 15:39 [ТС]
	Спасибо большое А можно объяснить подробней как составлена программа,а то я не очень понял) 0

@xtern 0 / 0 / 0 Регистрация: 20.10.2010 Сообщений: 6
	21.10.2010, 20:13 [ТС]
	Спасибо Теперь прояснилось 0