Đăng nhập để hỏi chi tiết
3
1
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
11
6
2
0
var a,b,c,d,e : real;
begin
readln(a,b,c);
d:=a+b+c;
writeln('Chu vi : ',d);
d:=d/2;
e:=sqrt(d*(d-a)*(d-b)*(d-c));
writeln('Dien tich : ',e);
readln
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
3
90
1
pascal ạ