VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/13 04:02:29
VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0

VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0
VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0

VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0
Private Sub Form_Click() x = Val(InputBox("请输入一个数:")) If x > 0 Then y = 1 If x < 0 Then y = -1 If x = 0 Then y = 0 Print y End Sub

VB代码若X大于0,则Y等于1.若X小于0.则Y等于-1.否则Y等于0 若实数x,y满足条件x-y小于等于0,x+y大于等于0,y小于等于1.则x+2y的最大值是 若6x小于等于6y,则有( )A.x小于等于y B.x大于等于y C.x小于y D.x大于y 若x+y大于0,x-y小于0,xy小于0,则|x|( )|y|(填大于小于或等于~) 已知a大于0,x,y满足条件x大于等于1,x+y小于等于3,y大于等于a(x-3).若z=2x+y的最小值为1.则a= 若实数x、y满足x-y+1小于等于0,x大于0,x小于等于2,则y/x的取值范围是? 若实数x、y满足x-y+1小于等于0,x大于0,x小于等于2,则y/x的取值范围是? 已知x,y满足约束条件【x+y小于等于3】【x-y大于等于-1】【y大于等于1】,若【0小于等于ax+by小于等于2】,则(b+2)/(a+1)的取值范围是 若x+y大于0,xy小于0,x-y小于0,则|x|____|y| (横线内填大于小于或等于若x+y大于0,xy小于0,x-y小于0,则|x|____|y| (横线内填大于小于或等于) 若实数XY满足约束条件X大于等于0,Y大于等于0,X+Y小于等于1,则Z=3X+Y的最大值为 若x大于等于0,y大于等于0,且x+y小于等于1,则z=x-y的最大值 已知实数x,y满足x-y大于等于0,x+y-1小于等于0已知实数x,y满足x-y大于等于0,x+y-1小于等于0,y+1大于等于0,若点P(x,y)在圆x^2+(y-1)^2=a(a大于0)的内部或圆上,则a最小值为 若实数对(x,y)满足约束条件x>0y大于等于x 2x+y-3小于等于0则y+1/x的最小值 若变量x,y满足约束条件x大于等于-1,y大于等于x,x+y小于等于1,则z=3x+y的最大值为? 若,x,y满足x+y大于等于0,x-y+3大于等于0,x大于等于0小于等于3.则z=2x-y的最大值希望有多细讲多细,大家帮帮忙吧,谢谢了. 若x+2y小于等于3,x大于等于0,y大于等于1,则x的取值范围是( ) 求详解. 若XY满足:2X+Y小于等于8,X+3Y小于等于9,X大于等于0,Y大于等于0,则 Z=X+2Y的最大值为多少? 若x大于等于0,y大于等于0,2x+3y小于等于100,2x+y小于等于60,则Z=6x+4y的最大值是?