作业帮 > 综合 > 作业

用free pascal输入三角形三条边的值,能构成三角形,输出其面积后结束,不能输出no

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/24 16:32:56
用free pascal输入三角形三条边的值,能构成三角形,输出其面积后结束,不能输出no
program t1;
var a,b,c,n:integer;
begin
n:=a+b+c;
if (a+b>c) and (b+c>a) and (a+c>b) then writeln(n)
else writeln('NO');
end.
千万要采纳我,因为我是——辛耀东!