Bài 7: Các thủ tục chuẩn vào ra đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Việt Nguyễn

Viết chương trình tính chu vi ,diện tích bán kính đường tròn nội tiếp, bán kính đường tròn ngoại tiếp của ∆ABC (3 cạnh nhập từ bàn phím )

Luân Đào
1 tháng 10 2020 lúc 5:49

var a,b,c,p,s: real;
begin
writeln('NHAP BA CANH TAM GIAC: ');
repeat
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
until (a+b>c) and (b+c>a) and (c+a>b);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Chu vi tam giac: ',2*p:5:2);
writeln('Dien tich tam giac: ',s:5:2);
writeln('Ban kinh duong tron ngoai tiep: ',a*b*c/(4*s):5:2);
writeln('Ban kinh duong tron noi tiep: ',s/p:5:2);
end.


Các câu hỏi tương tự
cao thi trang
Xem chi tiết
Huynhnhu
Xem chi tiết
Trang Nguyễn
Xem chi tiết
nguyễn nhất nam
Xem chi tiết
abcde
Xem chi tiết
ᄃᄀHjs
Xem chi tiết
Hoàng Thị Thu Hà
Xem chi tiết
0o0 Nhok kawaii 0o0
Xem chi tiết
Xuân Huy
Xem chi tiết