用键盘输入a 、b 、c的值,判断它们能否构成三角形的三边.如果能够构成三角形则求它的面积.

用键盘输入a 、b 、c的值,判断它们能否构成三角形的三边.如果能够构成三角形则求它的面积.

题目
用键盘输入a 、b 、c的值,判断它们能否构成三角形的三边.如果能够构成三角形则求它的面积.
海伦公式; S = Sqr(p * (p - a)*(p - b)*(p - c)) ,其中 p = (a + b + c)/2
答案
Private Sub Command1_Click()
a = Val(InputBox("输入a的长"))
b = Val(InputBox("输入b的长"))
c = Val(InputBox("输入c的长"))
If a + b > c And a + c > b And b + c > a Then
p = (a + b + c) / 2
s = Sqr(p * (p - a) * (p - b) * (p - c))
Print "面积:"; s
Else
Print "不是三角形"
End If

End Sub
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
最新试题
热门考点

超级试练试题库

© 2017-2019 超级试练试题库,All Rights Reserved.