用vb语言编写下列分段函数:当x的值为偶数时,y的值为x的一半 当x的值为奇数时,y的值为x的两倍
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/09 10:03:34
用vb语言编写下列分段函数:当x的值为偶数时,y的值为x的一半 当x的值为奇数时,y的值为x的两倍
只要判断出输入的数是奇数还是偶数就行了:可以试试以下代码.
Private Sub form_click()
Dim y,x '定义了两个变体变量
x = InputBox("请输入一个整数","数据输入")
If x = "" Then '判断输入的数是否为空值
MsgBox "请输入一个整数",,"提示"
Exit Sub
End If
x = CDbl(x)
If Int(x) x Then '判断输入的数是不是整数
MsgBox "请输入一个整数",,"提示"
Exit Sub
End If
If x Mod 2 = 0 Then
y = x / 2
Print "您输入的是偶数,y=x/2=";
ElseIf x Mod 2 0 Then
y = 2 * x
Print "您输入的是奇数数y=2x=";
End If
Print y
End Su
Private Sub form_click()
Dim y,x '定义了两个变体变量
x = InputBox("请输入一个整数","数据输入")
If x = "" Then '判断输入的数是否为空值
MsgBox "请输入一个整数",,"提示"
Exit Sub
End If
x = CDbl(x)
If Int(x) x Then '判断输入的数是不是整数
MsgBox "请输入一个整数",,"提示"
Exit Sub
End If
If x Mod 2 = 0 Then
y = x / 2
Print "您输入的是偶数,y=x/2=";
ElseIf x Mod 2 0 Then
y = 2 * x
Print "您输入的是奇数数y=2x=";
End If
Print y
End Su
用vb语言编写下列分段函数:当x的值为偶数时,y的值为x的一半 当x的值为奇数时,y的值为x的两倍
VB题目:当x的值是偶数时为真,奇数时为假的表达式.怎么写?
VB 编写程序,求函数y的值(当x小于等于0时,y=3x+1;当x>0时,y=4x+1)
c语言求分段函数分段函数求解:输入 x ,计算并输出 y 的值:y=x+100 ( 当 x < 20) y= x ( 当
【高数】F(X)是分段函数 ,当x奇数时为1 偶数时为0 它是单调的吗?
编写程序,计算下列分段函数的值.x (x>=0) y= -x (x
当x=2013,y=2014时,代数式(x/y-y/x)÷x-y/x的值为
若希望当x的值为奇数时,表达式的值为“真”,x的值为偶数时,表达式的值为“假”
已知2x+3y=4,当x=y时,x的值为
】当自变量x=_____时,函数y=3x-1的值为-2
已知y=x的平方-3x+2,当x=()时,y的值为0;当x=()时,y的值为6
已知y=(x-3)(x+1),当x是什么数时,y的值为0?当x是什么数时,y的值为5?