VB.if sgn(x) Private Sub Command1_Click()Dim x As Integer,y As Integerx = -4If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfEnd Subsgn函数不是为-1,0,或者1吗if sgn(x)
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/24 16:36:55
![VB.if sgn(x) Private Sub Command1_Click()Dim x As Integer,y As Integerx = -4If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfEnd Subsgn函数不是为-1,0,或者1吗if sgn(x)](/uploads/image/z/5789342-38-2.jpg?t=VB.if+sgn%EF%BC%88x%EF%BC%89+Private+Sub+Command1_Click%28%29Dim+x+As+Integer%2Cy+As+Integerx+%3D+-4If+Sgn%28x%29+Theny+%3D+Sgn%28x+%5E+2%29Elsey+%3D+Sgn%28x%29End+IfEnd+Subsgn%E5%87%BD%E6%95%B0%E4%B8%8D%E6%98%AF%E4%B8%BA-1%2C0%2C%E6%88%96%E8%80%851%E5%90%97if+sgn%EF%BC%88x%EF%BC%89)
VB.if sgn(x) Private Sub Command1_Click()Dim x As Integer,y As Integerx = -4If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfEnd Subsgn函数不是为-1,0,或者1吗if sgn(x)
VB.if sgn(x)
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x = -4
If Sgn(x) Then
y = Sgn(x ^ 2)
Else
y = Sgn(x)
End If
End Sub
sgn函数不是为-1,0,或者1吗
if sgn(x)
VB.if sgn(x) Private Sub Command1_Click()Dim x As Integer,y As Integerx = -4If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfEnd Subsgn函数不是为-1,0,或者1吗if sgn(x)
-1, 1 时为 true, 0 时为 false
if sgn(x) then.X不为0时均符合
这啰嗦代码是不是下面这功能
y=sgn(x^2)