1 / 1 / 0
Регистрация: 05.10.2011
Сообщений: 52
1

Массив: вычислить среднее арифметическое значение главной диагонали квадратной матрицы

24.02.2013, 22:26. Показов 3020. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Всем доброе время суток.
У меня тут проблемка с структурой Сумма нарисовалась. проблема вот в чём: есть задача в которой надо вычислить среднее арифметическое значение главной диагонали квадратной матрицы, вроде блок схему правильно сделал, но вот как записать код я не понимаю, кто может помогите если не сложно.
вот что смог тока сделать:
Visual Basic
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
26
27
28
Option Base 1
Private Sub Command1_Click()
Dim n As Integer, i As Integer, j As Integer, a() As Integer
Dim m As Single
n = InputBox("Введите размерность матрицы n")
ReDim a(i, j)
For i = 1 To n
For j = 1 To n
a(i, j) = InputBox("Введите элементы матрицы, a(" & i & ", " & j & " ) = ")
Next j
Next i
m = 0
For i = 1 To n
For j = 1 To n
(тут проблема какразтаки)
Next j
Next i
m = m / n
Print
Print "Размерность матрицы", n
Print
Print "Среднее арифметическое главной диагонали ", m
End Sub
 
 
Private Sub Command2_Click()
End
End Sub
Блок схема вот:
Массив: вычислить среднее арифметическое значение главной диагонали квадратной матрицы
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.02.2013, 22:26
Ответы с готовыми решениями:

Определить индексы минимального элемента на главной диагонали квадратной матрицы
Определить индексы минимального элемента на главной диагонали квадратной матрицы N4 размерности ...

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

Вычислить верно ли, что наибольшее из значений главной диагонали матрицы, больше чем наименьшее из значений элементов побочной диагонали
Помогите задачу сделать, с бейсиком никогда не работал) Дана квадратная матрица A (4 x 4)....

Из последовательности N чисел вычислить среднее арифметическое значение отрицательных
Вводится последовательность из N чисел. Вычислить среднеарифметическое значение отрицательных среди...

2
Модератор
9869 / 3776 / 876
Регистрация: 22.02.2013
Сообщений: 5,629
Записей в блоге: 78
24.02.2013, 22:44 2
Блок-схема неверна.
Visual Basic
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
26
Option Base 1
Private Sub Command1_Click()
Dim n As Integer, i As Integer, j As Integer, a() As Integer
Dim m As Single
n = InputBox("Введите размерность матрицы n")
ReDim a(n, n)
For i = 1 To n
For j = 1 To n
a(i, j) = InputBox("Введите элементы матрицы, a(" & i & ", " & j & " ) = ")
Next j
Next i
m = 0
For i = 1 To n
    m = m + a(i, i)
Next i
m = m / n
Print
Print "Размерность матрицы", n
Print
Print "Среднее арифметическое главной диагонали ", m
End Sub
 
 
Private Sub Command2_Click()
End
End Sub
1
Модератор
9869 / 3776 / 876
Регистрация: 22.02.2013
Сообщений: 5,629
Записей в блоге: 78
24.02.2013, 23:08 3
Блок-схема
Миниатюры
Массив: вычислить среднее арифметическое значение главной диагонали квадратной матрицы  
1
24.02.2013, 23:08
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.02.2013, 23:08
Помогаю со студенческими работами здесь

Вычислить и вывести среднее арифметическое значение элементов заданного массива
VB 6.0. Задания простые но не для меня 1.Вычислить и вывести среднее арифметическое значение...

Транспонируйте массив, и выведите элементы главной диагонали и диагонали, расположенной под главной
Сформируйте двумерный массив K(8,8) по правилу: Kij=8∙(i - j)+j. Транспонируйте массив (поменяйте...

Заполнить массив десятью случайными числами и вычислить их среднее арифметическое
1. Создать проект, который заполняет массив десятью случайными числами и вычисляет их среднее...

Переписать положительные элементы главной диагонали, матрицы в одномерный массив Y
Задание: Переписать положительные элементы главной диагонали, матрицы в одномерный массив Y. В...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru