Bài 5. Từ bài toán đến chương trình

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Huynh ThuongHan

-lập chương trình nhập vào độ dài các cạnh của tam giác rồi :

+tính chu vi và diện tích của tam giác

+kiểm tra xem tam giác đó có là tam giác cân hoặc tam giác vuông hay không ?HELP me !!!!!!
Luân Đào
31 tháng 12 2020 lúc 17:30

var a,b,c,s,p: real;

begin

write('Nhap canh thu nhat: '); readln(a);

write('Nhap canh thu hai: '); readln(b);

write('Nhap canh thu ba: '); readln(c);

if (a+b>c) and (b+c>a) and (c+a>b) then 

begin

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

writeln('Chu vi tam giac la ',2*p:5:2, '(dvdd)');

writeln('Dien tich tam giac la: ',s:5:2, '(dvdt)');

if (a=b) and (b=c) then writeln('Day con la tam giac deu') else

if (a=b) or (b=c) or (c=a) then writeln('Day la tam giac can') else

if (a*a+b*b=c*c) or (b*b+c*c=a*a) or (c*c+a*a=b*b) then writeln('Day la tam giac vuong') else

writeln('Day la tam giac thuong');

if ((a=b) or (b=c) or (c=a)) and ((a*a+b*b=c*c) or (b*b+c*c=a*a) or (c*c+a*a=b*b)) then writeln('Day la tam giac vuong can')

end

else writeln(a:5:2,',',b:5:2,',',c:5:2,' khong la do dai mot tam giac');

end.

Huynh ThuongHan
31 tháng 12 2020 lúc 15:16

help me !!!!!!


Các câu hỏi tương tự
phạm hoàng phú
Xem chi tiết
nguyễn thị diệu linh
Xem chi tiết
Nguyễn Thị Hải Vy
Xem chi tiết
dung nguyễn
Xem chi tiết
Phạm Thanh Trúc
Xem chi tiết
Tại Rùa Hết
Xem chi tiết
Uyển Lộc
Xem chi tiết
Bắc Kim Thang Trai
Xem chi tiết
13. Thảo My 64
Xem chi tiết