一道关于VF的题题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-

Question

一道关于VF的题
题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-B)*(L-C))其中L=(A+B+C)/2.
求该编程题的解题过程 规范书写

Answer 1

clear
"请输入3条变长："
input "a=" to a
input "b=" to b
input "c=" to c
if sjxtest(a,b,c)
l=(a+b+c)/2
s=sqrt(l*(l-a)*(l-b)*(l-c))
"三边可以构成三角形,面积为：s=",s
else
"三边不可以构成三角形"
endif
function sjxtest(x,y,z)
if x+y>z and y+z>x and z+x>y
test=.t.
else
test=.f.
endif
return test
endfunction