Выполнить табулирование функции f(x) на интервале [a, b] с шагом H для m точек
Выполнить табулирование функции f(x) на интервале [a, b] с шагом H для m точек
2009-12-02 07:07 Александр
Выполнить табулирование функции f(x) на интервале [a, b] с шагом H для m точек
Private Sub Command1_Click()
Dim t, A, B, i, H, m, y As Long
t = Val(Text1.Text)
A = Val(Text2.Text)
H = Val(Text3.Text)
m = Val(Text4.Text)
B = A + (m - 1) * H
For i = A To B Step H
If i >= -t Then y = i [...]