vb编程。判断三条边能否构成三角形
在inputbox中，输入三个数，判断三条边能否构成三角形，如果可以，在窗体上显示三角形面积。当输入-1时结束程序。求详解！...
在inputbox中，输入三个数，判断三条边能否构成三角形，如果可以，在窗体上显示三角形面积。当输入-1时结束程序。
求详解！ 展开
求详解！ 展开
3个回答
展开全部
前提：输入不为空，输入必须是数字。
1：判断三个数分别>0，并存储在a、b、c三个变量中
2：判断a+b>c 或 b+c>a 或 a+c>b 是三角形，如果不满足条件就提示“不是三角形”
3：将a，b，c套入到三角形计算面积公式。
“输入-1时结束程序”不明白是在哪个控件里操作，你可以在某个控件里end就可以了。
1：判断三个数分别>0，并存储在a、b、c三个变量中
2：判断a+b>c 或 b+c>a 或 a+c>b 是三角形，如果不满足条件就提示“不是三角形”
3：将a，b，c套入到三角形计算面积公式。
“输入-1时结束程序”不明白是在哪个控件里操作，你可以在某个控件里end就可以了。
追问
也十分感谢你，给我提供严谨的思路
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
利用任意两边这和大于第三边判断是不是三角形，然后用海伦公式求面积http://baike.baidu.com/view/1279.htm
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
两条小边的和大于第三边，即成三角形。
面积： S＝ah/2
(2).已知三角形三边a,b,c，则 （海伦公式）（p=(a+b+c)/2）
S=√[p(p-a)(p-b)(p-c)]
=（1/4）√[(a+b+c)(a+b-c)(a+c-b)(b+c-a)]
会写了吗，朋友？
面积： S＝ah/2
(2).已知三角形三边a,b,c，则 （海伦公式）（p=(a+b+c)/2）
S=√[p(p-a)(p-b)(p-c)]
=（1/4）√[(a+b+c)(a+b-c)(a+c-b)(b+c-a)]
会写了吗，朋友？
追问
我用for循环设定inputbox只能出现三次，然后“并存储在a、b、c三个变量中”就不会了，放在循环内外都不行
追答
Private Sub Command1_Click()
Dim a, b, c
a = InputBox("a", "a", 1)
b = InputBox("b", "b", 1)
c = InputBox("c", "c", 1)
If a + b > c Then
Me.Print "可以形成三角行"
End If
End Sub
Me.Print "可以形成三角行" &“，面积为：海伦公式
海伦公式 这里你自己算下吧。直接加减这些；
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
