Перепишите пожалуйста код с языка С++ на Visual Basic - VB

Узнай цену своей работы

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

Вот кусок кода который нужно переписать на Visual Basic

Решение задачи: «Перепишите пожалуйста код с языка С++ на Visual Basic»

textual
Листинг программы
Private Sub Command1_Click()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    Dim A As Double, B As Double, P As Double
    Dim o As Double, r As Double
    A = 12.83: B = 0.863: P = 3.14
    o = InputBox("o = ", , 10.3)
    If (A > o And o > B) Then r = ((Log(o) / Log(10#)) ^ (1 / 3)) + o
    If (A < o) Then r = o + A * Sin(o * o + P / 12)
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    MsgBox r
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

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