Ответы
Ответ дал:
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
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад