作业帮 > 综合 > 作业

pascal从键盘上输入一个三角形的三条边长,计算出三角形的面积和周长

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/06/02 21:46:18
pascal从键盘上输入一个三角形的三条边长,计算出三角形的面积和周长
这样写错在哪里啊?
var
a,b,c,p,m:integer;
begin
write('a,b,c=');
readln(a,b,c);
p:=(a+b+c)/2;
m:=p*(p-a)*(p-b)*(p-c);
writeln('s=',sqrt(m));
writeln('l=',a+b+c);
readln;
end.
p和m不是integer,是real
而且输出的时候会用科学记数法显示,所以最好再定义2个变量,把面积和周长存起来,writeln([变量名]:0:2)【意思是保留2位小数】