Получить функцию из элементов массива - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д