判断三角形为直角三角形的vb程序

不正确,应该检验两个较短的线段的平方和是否等于第三条线段的平方,本题中应（6/5）*（6/5）+（8/5）*（8/5）=36/25+64/25=100/25=4=2*2是直角三角形

看看最长边的平方是否等于剩余两边的平方和.假设最长的边长为c,剩余两边分别是a和b,直接三角形必须满足c×c=a×a+b×

a=Val(inputbox("输入a"))b=Val(inputbox("输入b"))c=Val(inputbox("输入c"))Ifa+b>cAndb+c>aAndc+a>bThen'能构成Ifa

单击Command1即可.代码如下.DimaAsSingle,bAsSingle,cAsSingle,pAsSingle,SAsSinglePrivateSubCommand1_Click()OnEr

根据三角开面积可知:ABXCD/2=24假设ABC是直角三角形,则BCXAC/2=3XAC=24所以AC=8而6,8,10是一组勾股数,即6平方+8平方=10平方所以三角形ABC是直角三角形.

△MNC是等腰直角三角形.证明如下：因为,在△CBE和△CAD中,CB=CA,∠BCE=90°-∠ACE=∠ACD,CE=CD,所以,△CBE≌△CAD,可得：BE=CD,∠BEC=∠ADC；因为,在

斜边比直角边长,所以规定a是斜边了当然可以,并不是规定c就一定是斜边

解bd=√(6^2-4.8^2)=3.6所以ad=10-3.6=6.4ac=√(6.4^2+4.8^2)=8ac^2+bc^2=ab^2所以三角形abc为直角三角形.

最长边为a1^2+(2/3)^2≠(5/4)^2三角形ABC不是直角三角形

//看好记事本写的Judge.javapublicclassJudge{publicstaticvoidmain(String[]args){try{if(args.length!=3){Sy

S△BOC=20再问：过程?再答：这是小学的题吗，我表示怀疑。再问：是啊！小学六年级的再答：我的计算是用三角函数完成的，过程如下：几何解法：

算法没问题,按你的代码,调整了一下PrivateSubCommand1_Click()Dima!,b!,c!a=Val(InputBox("请输入a"))b=Val(InputBox("请输入b"))

PrivateSubCommand1_Click()a=Val(InputBox("输入a的长"))b=Val(InputBox("输入b的长"))c=Val(InputBox("输入c的长"))If

dima,b,casdoublePrivateSubCommand1_Click()a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)Ifa+

两条小边的和大于第三边,即成三角形.面积：S＝ah/2(2).已知三角形三边a,b,c,则　　（海伦公式）（p=(a+b+c)/2）　　S=√[p(p-a)(p-b)(p-c)]　　=（1/4）√[(

a+b=4两边平方a²+2ab+b²=16ab=2/7?应该是ab是二分之七吧ab=7/2所以a²+b²=16-2ab=16-7=9=c²所以是直角三

ab^2=16+1=17ac^2=9+25=34bc^2=1+16=17ac^2=ab^2+bc^2所以是直角三角形直角坐标系下的两点间距公式我就不列了,你应该看的懂.

PrivateSubCommand2_Click()Dima,b,ca=Text1.Textb=Text2.Textc=Text3.TextIfa-bcAnda+caThenMsgBox"该组数可构成

(x-y)(x+y)=1×225=9×25=3×75x=113,y=112或x=39,y=36或x=17,y=8