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")
else:
        print ("\nKhông Tạo Thành Tam Giác")

uses crt;

var a,b,c:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

until (a>0) and (b>0) and (c>0);

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

begin

writeln('La do dai ba canh cua tam giac');

writeln('Chu vi tam giac la: ',a+b+c:4:2);

end

else writeln('Khong phai la do dai 3 canh cua tam giac');

readln;

end.