viết ct nhập vào 3 số nguyên a,b,c từ bàn phím.sau đó kiểm tra xem có phải 3 cạnh của tam giác không.nếu phải thì tính diện tích ,chu vi và đưa ra tính chât của tam giác (đều,vuông,cân,thường).Nếu không phải thì đưa ra thông báo không phải 3 cạnh của tam giác
2 câu trả lời
uses crt;
var a,b,c:longintl
begin
clrscr;
readln(a,b,c);
if (a+b>c) and (b+c>a) and (a+c>b) and (a>0) and (b>0) and c>0) then
begin
if (a=b) and (b=c) then write('tam giac deu');
if (sqr(a)=sqr(b)+sqr(c)) or (sqr(b)=sqr(c)+sqr(a)) or (sqr(c)=sqr(b)+sqr(a))
then write('tam giac vuong');
if ((a=b) and (a mod c=0)) and ((a=c) and (a mod b =0)) and ((b=c) and (b mod c=0)) then write('tam giac can') ;
if (a<>b) and (b<>c) and (a<>c) thenwrite('tam giac thuong');
end
else write('khong la ba canh tam giac');
readln;
end.
gach="--------------------------------------------------"
print("CHƯƠNG TRÌNH XÁC ĐỊNH TAM GIÁC VÀ TÍNH CHU VI, DIỆN TÍCH")
print (gach)
a=float(input("Nhập vào cạnh a: "))
b=float(input("Nhập vào cạnh b: "))
c=float(input("Nhập vào cạnh c: "))
if (a+b>c) & (b+c>a) & (a+c>b) & (a>0) & (b>0) & (c>0):
if (a==b)&(b==c):
print ("\nĐây là tam giác đều")
elif (a==b)& (a!=c) | (a==c)&(a!=b) | (b==c) & (b!=a):
print ("\nĐây là tam giác cân")
elif (a*a==b*b+c*c)|(b*b==a*a+c*c)|(c*c==a*a+b*b):
print("\nĐây là tam giác vuông")
else:
print("\nĐây là tam giác thường")
import math
cv=a+b+c
p=cv/2
dt=math.sqrt(p*(p-a)*(p-b)*(p-c))
print ("\nChu vi tam giác: ",round(cv,2))
print ("Diện tích tam giác: ",round(dt,2))
else:
print ("\nKhông Tạo Thành Tam Giác")
print (gach)
print ("Thank You ")