Получить функцию из элементов массива - 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 из 5
Похожие ответы