Дана действительная матрица размера m х n. Определить числа b1, …, bm, равные соответственно:
a) наименьшим значениям элементов строк;
b) значениям средних арифметических элементов строк;
c) разностям наибольших и наименьших значений элементов строк.
Матрицу с вводом количества столбцов и строк заполняющиеся рандомными числами сделал, но дальше не знаю как делать. Буду благодарен, если хотя бы опишите логику или примерное решением.
Также тема создана на форуме
a) наименьшим значениям элементов строк;
b) значениям средних арифметических элементов строк;
c) разностям наибольших и наименьших значений элементов строк.
Матрицу с вводом количества столбцов и строк заполняющиеся рандомными числами сделал, но дальше не знаю как делать. Буду благодарен, если хотя бы опишите логику или примерное решением.
| Код |
|---|
Sub Задача3()
Dim n As Long, m As Long
Dim i As Long, j As Long
Dim A() As Double
n = InputBox("Введите n")
m = InputBox("Введите m")
ReDim A(1 To n, 1 To m)
For i = 1 To n
For j = 1 To m
A(i, j) = 10 * Rnd + 1
Next j
Next i
End Sub |
Также тема создана на форуме
Изменено: - 03.02.2016 21:09:26
