VB编写程序 1.要求输入X输出Y,Y=1+X(X≥0),y=1-2X(X<0)

还有2个 将下列数从小到大排列 10,48,74,45,87,69,85,38,88,15,29
随机20个两位整数,输出最大和最小值

写出你的邮箱,我发给你源程序追问

363178447@qq.com

追答

已发送,请查收

追问

能不能给个代码啊

追答

已发送到你的邮箱,发的就是源代码

追问

能不能以TXT的形式发给我啊?DOC的也可以

追答

已发送,请查收

追问

嗯嗯,谢谢了

追答

那就采纳我的吧。

温馨提示:内容为网友见解,仅供参考
无其他回答

VB编程 计算分段函数:y=1(x>0) y=0(x=0) y=-1(x<0)
else if( x <= 10)printf("%d", 4 * x -8);else printf("%d",sqrt(x));return 0;}

vb的题,已知一个分段函数,y=-2x+1 x<0,0 x=0,2x+1=0 x>0 输入x值求y...
dim x as single dim y as single x = inputbox("输入x的值:")if x<0 then y= -2*x+1 elseif x=0 y=0 else y = 2*x+1 end if print y

vb程序设计:输入X,Y,使X总大于Y,输出X的值。
Private Sub Form_Load()Dim x As Long, y As Long Dim a As Long x = InputBox("输入x值", "")y = InputBox("输入y值", "")If x < y Then x = y + 1 End If MsgBox x End Sub

...有一函数: 编写程序,要求输入x 的值输出y 的值。
include <stdio.h>int func1(int x){int y;if(x < 0 && x > -5)y = x;if(x == 0) y = x -1;if(x > 0 && x < 10)y = x + 1;return y;}int func2(int x){int y;if(x < 10 && x > -5){if(x == 0) y = x -1;if(x < 0) y = x;if(x > 0)...

vb函数代码 0 x<0 y= 1 0≤x≤1 2 x≥1 用if条
表达应该是 iif(x>0,1,iif(x<0,-1,0)), if 是VB的分支语句保留字 iif函数意义在 iif(条件,表达式1,表达式2) 如果条件成立,取表达式1的值,否则取表达式2的值。iif(x>0,1,iif(x<0,-1,0))=iif(x<0,-1,0) '因为x=0,所以x>0不成立,取表达式2的值 =0 '因为...

...输入X,输出Y Y=X-1 X<0 Y=2X-1 0<=X<=10 Y=3X-11 X>10
include<stdio.h> include<stdlib.h> int main(void){ int x,y;printf("请输入x的值:\\n");scanf("%d",&x);if(x<0){ y=x-1;} else if(x<=10&&x>=0){ y=2*x-1;} else { y=3*x-11;} printf("y的值为:%d\\n",y);system("pause");return 0;} ...

1、 输入一个数x,输出y。其中y是x的绝对值。 2、 输入三个数x,y,z...
&z);\/\/输入三个数 max=x;if(y>max)max=y;if(z>max)max=z;printf("%d\\n", max);\/\/输出最大值 } 3 include"stdio.h"void main(){ int x,y;scanf("%d", &x);if(x<0)y=-1;else if(x==0)y=0;else y=1;printf("%d", y);} 参考资料:clanguage. baike. com ...

vb:简易计算器(加减乘除)代码
代码如下:Dim t, t1 As Integer Dim x, y As Double Public Sub com()x = Val(l1.Caption)Select Case t1 Case Is = 1: y = y + x Case Is = 2: y = y - x Case Is = 3: y = y * x Case Is = 4: y = y \/ x End Select t1 = 0 t = 0 l1.Caption = "0"...

VB表达式,输入x,y,z三个数,按照从大到小的次序显示
Private Sub Command1_Click()x = InputBox("输入第一个数:")y = InputBox("输入第二个数:")z = InputBox("输入第三个数:")Print " x y z"Print "排序前 ", x, y, z Print "排序后 ";If x > y And x > z Then If y > z Then Print " ", x, y, ...

五道VB程序分析题,答案有,求大神给分析一下程序过程,急!
8、输入一个数X,如果X>=0,则Y=1-2*X,否则的话Y=1+X 9、循环,直到i大于7,每次循环i增加3,X增加5 10、RND函数是返回一个0—1之间的 随机数 ,所以取整后X为4(只取 整数部分 ),输出结果必为GOOD 11、循环,每一次循环X=(X+3)*(X+4),N为循环次数,循环直到X>=60为止,...

相似回答
大家正在搜