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/07/04 20:37:24
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)
x) sLS(N{N̲ĒT$ļxl M\ bϼ"J$NgBpzFBHFj^%P US0t)Nh(xHU@0ő6IE.s>X^?U@<f,%_rPqLl~B~P,Cgӷ+(iSB ez@J :mf H:^tꆧӗ=ٽF .~9wHk潐8-(wyv?

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)