作业帮 > 综合 > 作业

VB.if sgn(x)

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/01 20:05:56
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)
-1, 1 时为 true, 0 时为 false

if sgn(x) then.X不为0时均符合

这啰嗦代码是不是下面这功能
y=sgn(x^2)