как записать формулу на vb ? (убедительная просьба: пожалуйста с кодом ) - VB

Формулировка задачи:

формула:

Код к задаче: «как записать формулу на vb ? (убедительная просьба: пожалуйста с кодом ) - VB»

textual
Private Sub Command1_Click()
Dim x As Long
For x = 500 To 2000
If x - Sqr(x ^ 2 - 160000) - 100 = 0 Then Debug.Print x
Next x
End Sub

11   голосов, оценка 3.818 из 5


СОХРАНИТЬ ССЫЛКУ