VISUAL BASIC
Вычислить значение заданной функции. Осуществить вывод значений аргумента и результатов вычислений значений функции в заданном диапазоне с заданным шагом:

Sub Zadanie()
    step = 0.2
    x = 1
    s = ""
    Do While x <= 3
        s = s & "x = " & x & " y = " & 1/(x*x*x) & vbNewLine
        x = x + step
    Loop
    MsgBox (s)
End Sub

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!