一道关于VF的题题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/21 19:54:49
一道关于VF的题题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-
一道关于VF的题
题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-B)*(L-C))其中L=(A+B+C)/2.
求该编程题的解题过程 规范书写
一道关于VF的题题目是这样的：从键盘输入a、b、c的值,判断它们能否构成三角形的三条边.如果能构成一个三角形,则计算三角形的面积,否则给出出错信息.求面积的公式如下：AREA=SQRT(L*(L-A)*(L-
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
clear
set talk off
input "a=" to a
input "b=" to b
input "c=" to c
L=(a+b+c)/2
if a+b>c and a+c>b and b+c>a
area=sqrt(L*(L-A)*(L-B)*(L-C))
?"此三角形面积是：",area
else
?"此三个数不能构成三角形，数据错误！"
endif
set talk on
return