program Tam_giac;
uses crt;
var a,b,c:integer;
begin
readln(a,b,c);
if (a+b>c) and (b+c>a) and (c+a>b)
then if (a=b) and (b=c)
then writeln('La tam giac deu')
else if (a*a=b*b+c*c) or (b*b=a*a+c*c) or (c*c=a*a+b*b)
then writeln('La tam giac vuong can')
else writeln('La tam giac vuong')
else if (a=b) or (b=c) or (c=a)
then writeln('La tam giac can')
else writeln('Tam giac thuong')
else writeln('Khong phai la tam giac');
readln
end.
chúc học tốt nha