求三角形面积的vb应用程序
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/25 13:57:39
有现成公式,m=(a+b+c)/2;area=sqrt(m*(m-a)*(m-b)*(m-c));area为面积别问我怎么来的,我也不清楚,但绝对好用周长就不用我说了吧
运用海伦公式dimPaslong,Saslongifa+b>cthenifb+c>athenifa+c>bthenp=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))endife
定义一个command四个label四个text.具体属性为command.caption=计算label1.caption=第一条边的长度:label2.caption=第二条边的长度:label3
importjava.util.Scanner;classRound{\x09publicdoubleperimeter(doubleradius){\x09\x09returnradius*2;\x
PrivateSubCommand1_Click()Dima#,b#,c#,p#Me.AutoRedraw=Truea=3:b=4:c=5Doa=Val(InputBox("请输入三角形第一条边","
PrivateSubForm_Load()DoDimaAsSingle,bAsSingle,cAsSingle,pAsSingle,sAsSinglea=Val(InputBox("请输入三角形第1条
PrivateSubCommand1_Click()Text3.Text=3.14*(Val(Text1.Text)^2-Val(Text2.Text)^2)EndSub再问:能具体一点吗再答:上面就
你是指代码上还是编译程序上?…这“两个基本特点”说不好啊.考试用吗?
Dim a As Double = 0
dima,b,cPrivateSubText1_Change()a=Val(Text1)EndSubPrivateSubText2_Change()b=Val(Text2)EndSubPrivateS
是VB,就做界面.先做一个窗体,其上有四个文本框,text1、text2、text3、text4依次输入边长a、b、角A的值,在text4中输出面积,你可以在前面加上标签说明再加一个命令按钮comma
1、已知三角形三边abc,那么周长2P=a+b+c2、那么它的面积=根号下【P(P-a)(P-b)(P-c)】,注P为三角形周长的一半.
声明变量,并声明数据类型,否则,A,B,C三个变量是String,表达式(A+B+C)的结果不是12,而是"345".
提示:1,根据两点公式,长的三面:L1=SQR((X1-X2)^2+(Y1-Y2)^之间的距离,可以计算出2)2,长的三面,发现该地区的?一个三角形,根据海伦公式求.
你只需要编程么?PrivateSubCommand1_Click()IfVal(Text1.Text)>0AndVal(Text2.Text)>0ThenLabel1.Caption="长方形的面积为
PrivateSubCommand1_Click()a=Val(InputBox("输入a的长"))b=Val(InputBox("输入b的长"))c=Val(InputBox("输入c的长"))If
packagetest;publicclassTest{publicstaticvoidmain(Stringargs[]){System.out.println(getSum(123));}publ
Console.WriteLine("请输入圆的半径");intr=int.Parse(Console.ReadLine());doublecircle=2*3.14*r;doublearea=3.1
假设方程的系数均为整数,且方程有解,则如下代码:结果是以分数表示的,相当准.DimDSubGongYueShu(ByValA,ByValB)DimCAsLongIfB>AThenC=BB=AA=CEn
结构化编程的时候具有明显的开始和结束语句.现在是面向对象的编程.再问:十分感谢您的回答!但我还是不理解所有的面向对象的编程都没有明显的开始和结束语句吗?能不能举个例子,结构化编程有明显的开始和结束语句