vfp编程输入三角形边长，满足两边之和大于第三边且为正值，计算输出三角形的面积 s，若不满足条件
答案:1 悬赏:70 手机版
解决时间 2021-03-24 12:39
- 提问者网友：星軌
- 2021-03-24 06:09
vfp编程输入三角形边长，满足两边之和大于第三边且为正值，计算输出三角形的面积 s，若不满足条件
最佳答案
- 五星知识达人网友：青尢
- 2021-03-24 07:05
clear
set talk off
input "a=" to a
input "b=" to b
input "c=" to c
k=0
if a<=0 or b<=0 or c<=0
k=k+1
endif
if a+b
if k=0
p=(a+b+c)*0.5
s=sqrt(p*(p-a)*(p-b)*(p-c))
? s
else
? "不满足三角形条件＂
endif
return追答略作更正。
clear
set talk off
input "a=" to a
input "b=" to b
input "c=" to c
k=0
if a<=0 or b<=0 or c<=0
k=k+1
endif
if a+b<=c or b+c<=a or a+c<=b
k=k+1
endif
if k=0
p=(a+b+c)*0.5
s=sqrt(p*(p-a)*(p-b)*(p-c))
? s
else
? "不满足三角形条件＂
endif
return
set talk off
input "a=" to a
input "b=" to b
input "c=" to c
k=0
if a<=0 or b<=0 or c<=0
k=k+1
endif
if a+b
if k=0
p=(a+b+c)*0.5
s=sqrt(p*(p-a)*(p-b)*(p-c))
? s
else
? "不满足三角形条件＂
endif
return追答略作更正。
clear
set talk off
input "a=" to a
input "b=" to b
input "c=" to c
k=0
if a<=0 or b<=0 or c<=0
k=k+1
endif
if a+b<=c or b+c<=a or a+c<=b
k=k+1
endif
if k=0
p=(a+b+c)*0.5
s=sqrt(p*(p-a)*(p-b)*(p-c))
? s
else
? "不满足三角形条件＂
endif
return
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯