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

Ответы на вопрос
Ответил Аноним
0
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
MsgBox ("pri x=" + CStr(x) + " y=" + CStr(y))
End Sub
Dim y As Integer
Sub zadacha()
x = InputBox("vvedi x", "VVod dannyh", 11)
If x <= 10 Then y = 210 Else y = x * x * x
MsgBox ("pri x=" + CStr(x) + " y=" + CStr(y))
End Sub
Новые вопросы