Получить функцию из элементов массива - VB

Формулировка задачи:

Помогите пож-та с програмированием. Нужно только расшифровать задание, остальное сделаю сам. Имеется массив (матрица-вектор), нужно из элементов получить функцию. Просто понять не могу, что эти буковки означают.

Код к задаче: «Получить функцию из элементов массива - VB»

textual
Private Sub Command1_Click()
Dim i%, n%
n = 10
ReDim x(n)
For i = 1 To n
     x(i) = Int(Rnd * 5) + 1
     Print x(i); vbTab;
Next i
Print: Print: Print "Otvet: Y="; Y(x)
End Sub
 
Function Y(m())
Dim p%, i%, k%
Dim S
p = UBound(m)
Y = 1
For i = 1 To p
     S = 0
     For k = 1 To i
       S = S + m(k)
     Next k
     Y = Y * S
'.............
     Print "S("; i; ")="; S; vbTab; "Y("; i; ")="; Y
'.............
Next i
Print:
End Function

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

13   голосов, оценка 4.000 из 5


СОХРАНИТЬ ССЫЛКУ