Необходимо составит код на одномерный массив - VBA
Формулировка задачи:
Всем здрасти) необходимо составить код.
Вычислить и напечатать значения функции , где элементы массива А вводятся с клавиатуры.
за помощь буду сильно благодарен
Решение задачи: «Необходимо составит код на одномерный массив»
textual
Листинг программы
Sub test()
Dim A() As Long, Y() As String, i As Integer
i = InputBox("Введите количество чисел")
ReDim A(i - 1), Y(i - 1)
For i = 0 To UBound(A)
A(i) = InputBox("Введите число")
Y(i) = A(i) ^ 2 + A(i) - Sin(A(i))
Next i
MsgBox (Join(Y, vbCrLf))
End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д