首页 > 其它 > 题目详情
VB编程:从键盘输入三角形的三边,判断能否构成三角形:如果能构成三角形,则计算其面积
题目内容:
VB编程:从键盘输入三角形的三边,判断能否构成三角形:如果能构成三角形,则计算其面积优质解答
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 Su - 追问:
- 确定吗??
- 追答:
- 自己试下,应该可以
优质解答
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 Su
- 追问:
- 确定吗??
- 追答:
- 自己试下,应该可以
本题链接: