Помогите, пожалуйста! Надо написать программу ** условный оператор

Question

Помогите, пожалуйста! Надо написать программу на условный оператор

---

Comments

Надо в бейсике

Answer 1

Dim x As Integer
Dim y As Integer
Sub zadacha()
    x = InputBox("vvedi x", "VVod dannyh", 11)
    If x <= 10 Then y = 210 Else y = x * x * x<br>    MsgBox ("pri x=" + CStr(x) + " y=" + CStr(y))
End Sub